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Al fichero ARC 
SED 


INTRODUCCION 


En este bloque también debe 
cargarse el registro O (o 1) de 
ARC, realizando los oportunos 
controles sobre la ocupación del 
fichero 


Vuelve al 
menú principal 


B$(5) contiene el valor del 
campo síntoma 


Para esta función se utiliza la 
Inserción en VOC segunda parte de la subrutina de 
17500 comprobación de la existencia 
de una voz en el vocabulario 


Vuelve al 
menú principal 


(*) Solo para la versión cassette 


2013 


ACTUALIZACION 


> 


Los campos de 
introducción previstos 
son: 

Nombre 

Fecha 


MN 


y Vuelve al 
> menú principal 


La búsqueda puede ser 
en disco o en memoria, 
según la versión 


Los datos anteriores se 
memorizan en una matriz 
separada para los controles 
al final de la introducción 
(AC$(1) = fecha 

y AC$(2) = sintoma) 


Vuelve al 
menú principal 


yy Sl 
ED» 


B$(5) contiene el valor del 
campo síntoma y se 
compara con el 
preexistente para 
determinar si se han 


El campo ha variado. 
producido variaciones 


Deben hacerse las comprobaciones 


J | 
00) 


El control se realiza entre 
AC$(1) y B$(2) + 
B5$(3) + B5(4) 


y 


Inserta 
el síntoma 


fo 
1 


Al fichero ARC 


O 


j 


(*) Sólo para la versión cassette 
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FLUJO GENERAL: FACTOR DE CRECIMIENTO Y TABLAS 


12 registros, cada uno con: 


— Edad (en meses, 2 caracteres de 00 a 72) 
— Altura mínima (3 caracteres) 

— Peso mínimo (4 caracteres) 

— Peso máximo (4 caracteres) 

— Circ. cráneo mínima (2 caracteres) 

— Circ. cráneo máxima (2 caracteres) 


O 0 _Ñ_— 


IT 


El registro 1 contiene: 


— Nombre 

- Sexo 

— Nacimiento (*) 

— Ultimo registro ocupado 
— Filler 


Introd./variación 
A tablas 


Ln 
y 


Introd./variación 
pre [aa] 


El nombre de este fichero está 
constituido por las 3 primeras 
letras del nombre del niño 


a 


Caracteres 


— Fecha (6 caracteres) 
1 — Peso (4 caracteres) 
6 — Altura (3 caracteres) 
3 - Circ. cráneo (2 caracteres) 
4 — Filler (5 caracteres) 


(*) La máscara vídeo prevé el año entero, mientras que en el fichero sólo se memorizan los dos últimos caracteres 


Factor de crecimiento. En la última foto de la pá- 
gina 1990 se ha representado el menú principal. 
Con respecto a los dos procedimientos normales 
hay dos funciones más: Lista personas y Genera- 
ción del sistema. La segunda voz es análoga a 
las otras generaciones, y permite crear el fichero 
datos introduciendo la primera medida (el diagra- 
ma está en la pág. 2016). La lista personas es 
una simple lectura del primer registro datos con 
presentación de la lista y de la última medida rea- 
lizada (el diagrama está en la pág. 2017). 

En la página 2018 se ha representado el diagra- 
ma de gestión tablas; en esta subrutina no se ha 
previsto la creación de ficheros, puesto que se 
supone que ya existen. Por tanto, la única función 
necesaria en el menú principal es la variación. En 
la página 2019 se presenta el diagrama del pro- 
grama para su creación. En las páginas 2021 a 
2023 hay el diagrama para la introducción de las 
medidas y los de las subrutinas del Análisis. 


Calendario vacunaciones: Introducción y Ac- 
tualización. Las funciones de introducción de 


nuevos datos y de actualización están reunidas 
en una sola subrutina. Por tanto, el diagrama de- 
be prever algunas lógicas que permitan la selec- 
ción automática entre las dos funciones. 

Para este tipo de gestión se supone inicialmente 
que el fichero ya tiene la longitud precisa (igual al 
número máximo de registros que puede gestio- 
narse) y que está «en blanco». 

La primera función a realizar es la carga de los 
Data que, entre otras cosas, contienen la estruc- 
tura del registro. En estos Data, los campos se 
definen en la introducción, si ésta es la función 
pedida por el usuario. Después, la definición se 
modificará según las necesidades. 

Después de la carga de los Data (subrutina 7000) 
se pide la introducción del valor del campo clave, 
en este caso específico del Nombre y de la Vacu- 
na, que constituyen la identificación de cada re- 
gistro, o sea la clave de acceso. Para simplificar 
la estructura del programa, estos dos campos se 
introducen sin emplear la data entry y, al no ser 
posibles las correcciones, posicionando el cursor 
se produce una confirmación de la introducción. 


2015 


Después, utilizando los valo- 
res recién introducidos, el 
programa busca en el fiche- 
ro. Si el Nombre y la Vacuna 
ya están en él, se coloca en 
actualización; si no es así, 
en introducción. 

Obsérvese que la diferencia 
entre las dos funciones se 
reduce a variar el tipo de los 
campos y a la actualización 
del directorio. 

El bucle de búsqueda con- 
siste en la lectura de todos 
los registros del fichero y en 
la comparación entre sus 
contenidos y los valores 
(Nombre y Vacuna) introdu- 
cidos. Si hay coincidencia, 
los datos ya existen, por lo 
que se trata de una actuali- 
zación. En este caso, los da- 
tos contenidos en el registro 
deben presentarse, y como 
ya se han definido en la in- 
troducción (en los Data), de- 
be modificarse su tipo. La 
modificación consiste en 
asignar a la matriz TP (+) el 
valor exacto. Por tanto, es un 
sencillo bucle. 

En cambio, en el caso en 
que los datos no se hayan 
encontrado, debe activarse 
un flag que permita actuali- 
zar el primer registro (direc- 
torio) del fichero antes de 
salir de la subrutina. 
Después de la implantación 
del flag o de la modificación 
del tipo de los campos, si- 
guen las llamadas normales 
a la data entry. 


Búsqueda en el vocabula- 
rio. La subrutina de búsque- 
da en el vocabulario (17500) 
presenta algunas dificulta- 
des debido a su completa 
parametrización. 
Básicamente se trata de una 
subrutina normal de bús- 
queda, o sea de un bucle de 
lectura de los registros del fi- 
chero y comparación con un 
valor dado (a buscar), pero 
gestionada con modalidad 
diferente. 


2016 


En el diagrama, por brevedad, 


se han omitido las llamadas 
a la lectura de los DATA y la 
presentación de la máscara 


Los datos se transfieren 


al primer registro útil 
(número 2) 


Nueva 
persona 


GENERACION 


Escribe registro 1 


Cada niño del que se quiere 
seguir su factor de crecimiento 
tiene su propio fichero datos con 
un formato de registro de 20 
bytes 


Crea el fichero datos 


Escribe los datos del niño en el 
registro 1 y escribe el valor 1 en 
el campo reservado para el 
último registro ocupado 


La data entry se llama para la 
introducción de las medidas en 
el nacimiento. Sólo en este caso 
se proporcionan al sistema los 
valores de la fecha, puesto que 
son idénticos a los de la máscara 
anterior 


En el campo "último registro 
ocupado” se escribe el valor 2 


LISTA DE PERSONAS 


En particular, puede utilizarse tanto para introdu- 
cir un nuevo vocablo (en la creación del vocabu- 
lario) como para controlar la exactitud de una in- 
troducción durante el uso del programa. 

Para ello se utilizan dos flags: el primero (K9) lo 
activa la propia rutina si la comparación propor- 
ciona resultado positivo; el segundo (indicado ge- 
néricamente con un flag en el diagrama) debe im- 
plantarse en la llamada y determina el modo de 
funcionamiento. 

Poniendo en la llamada flag = O se activa la fun- 
ción de control con la que, según el resultado de 
la comparación, la subrutina vuelve inmediata- 
mente sin activar otras funciones; éste es el caso 
de una sola utilización para comprobación. 

Y viceversa, con el flag = 1, se activa la actualiza- 
ción automática del vocabulario. Como ya se ha 
indicado, el vocabulario puede ampliarse a medi- 
da que se utilizan nuevos términos; para activar 


En el registro 1 se lee MX, 
y en el 2, la fecha y las 
correspondientes medidas 


En el registro MX (última medida 
efectuada) se lee la fecha 
que completa la máscara 


esta función debe llamar la rutina con flag = 1. En 
este caso, al final del bucle de búsqgeda, si el dato 
(campo clave) no está presente, se inserta auto- 
máticamente. 

Resumiendo, las posibles situaciones son: 


m Caso de comparación negativa 
flag = O: sale 
flag = 1: emite un diagnóstico (la voz no exis- 
te) y sale 
flag = 2: inserta la nueva voz 
= Caso de comparación positiva 
flag = O: sale 
flag = 1: actualiza el registro 
flag = 2: emite un diagnóstico (la voz ya existe) 
y sale 


La utilización con flag = 2 está reservada a la 
introducción del vocabulario. Efectivamente, el 


2017 


diagnóstico previsto en el caso de comparación 
positiva evita las repeticiones de vocablos: con 
flag = O se reduce a una sencilla subrutina de 
búsqueda (la respuesta está en K9) y con flag = 
1 activa la actualización. 

Obsérvese finalmente que la rutina se presenta 
en la forma más generalizada para poderla utili- 
zar en otras aplicaciones. 


Gestión del vocabulario. La subrutina 16900 
muestra cómo puede utilizarse la anterior: la 
17500 para la gestión completa del vocabulario. 
Al principio se presenta un menú secundario para 
la selección de la función que se desea realizar. 
Las voces previstas son: 


m Introducción (flag = 2) 
m Actualización (flag = 1) 
" Impresión 

m Fin de tarea 


O 
E 


E 


2018 


DIAGRAMA DE PRINCIPIO DE LA GESTION TABLAS 


ia 
y 


> 


a Bi 
y 


SI 
ME > 


Según la voz seleccionada se tiene la vuelta al 
menú principal, la llamada a la subrutina de im- 
presión (17220) o la búsqueda en el vocabulario 
(17500). En este caso, la modalidad de desarrollo 
está determinada por el valor del flag. 

A la entrada de las subrutinas, si la impresora es- 
tá activada, se pasa al menú principal. Si no es 
así, se pregunta si el usuario desea continuar (ca- 
so de introducción o actualización). Con una res- 
puesta afirmativa se tiene una entrada al principio 
de la subrutina con una nueva presentación del 
menú secundario, mientras que si la respuesta es 
negativa, se vuelve al menú principal. 


Introducción de los datos. El diagrama 8000 
de la página 2013 muestra otra utilización de la 
17500. Esta subrutina realiza la introducción de 
un nuevo dato, aunque no se trata de una intro- 
ducción normal, porque el dato debe validarse 
por comparación con el vocabulario. 


Forma el nombre 
del fichero 


INTRODUCCION TABLAS 


En introducción, se controla 
que se introduzca la letra 
V = varones o la H = hembras. 


La data entry comprende 
toda la tabla (12 líneas x 6 columnas) 


Principio del bucle de escritura 


Bucle de formación de un registro 
(Edad + Altura máx. + Peso min. + 
+ Peso máx. + Circ. mín. + Circ. máx.) 


Siguiente 
registro Escribe el 
O registro = | 


2019 


Cada registro está formado por una línea de la tabla: por ejemplo, en el primer registro habrá escrito: 


para la lectura de los atributos de los campos, en 
la presentación de la máscara y en la data entry. 
Al final, si la introducción es convalidada (F = 5), 
empiezan las comprobaciones previstas. 

La primera consiste en un control formal sobre la 
fecha (B$(2) y B$(3)) para evitar errores de desa- 
tención. En cambio, la segunda consiste en la 
comprobación de la existencia del síntoma 
(B$(5)), para lo que se utiliza de nuevo la 17500. 
En esta subrutina, como ya se ha visto, si se en- 
cuentra el dato se activa un flag y la rutina termi- 
na. Si no es así, se produce la inserción automáti- 
ca. Sin embargo, puede producirse una condi- 
ción de error, particularmente cuando el fichero 
vocabulario se completa mientras se realiza una 
nueva introducción. En este caso se activa un flag 
de error y se detiene la ejecución del programa. 
Si la voz existe o es posible su inserción, los datos 
introducidos con la máscara vídeo se transfieren 
al fichero ARC, y la subrutina se pone en espera, 
ya del acuerdo para una nueva introducción, ya 
de la instrucción de retorno al menú principal. 


Actualización. El correspondiente diagrama 
puede verse en la página 2007. En el fichero 
ARC, la clave de acceso está constituida por los 
campos Nombre y Fecha y, por tanto, la primera 
función es la introducción de los correspondien- 
tes valores. Téngase en cuenta que, en la versión 
cinta, se carga en memoria todo el fichero VOC 
(vocabulario). 

Esta notable diferencia con respecto a la versión 
disco, debida a la imposibilidad de utilizar fiche- 
ros random, reduce notablemente la cantidad de 
datos (voces de vocabulario y nombres) que pue- 
den utilizarse. 

Los valores del Nombre y de la Fecha se buscan 
en el fichero ARC. Si la búsqueda tiene resultado 
positivo, se leen los otros campos del registro pa- 
ra formar la máscara vídeo completa. Todos los 
campos, obtenidos en el fichero ARC, se definen 
en la presentación. Por tanto, llamando nueva- 
mente la gestión de las máscaras (data entry), se 
tiene la presentación, con posibilidad de aportar 
correcciones. 

Las eventuales modificaciones deben tratarse de 
manera diferente según el campo que interesan. 
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De hecho, si se varía el síntoma, debe llamarse la 
subrutina que comprueba su existencia en el vo- 
cabulario, mientras que si la variación interesa la 
fecha, es necesario su control formal. Los otros 
campos sólo son descriptivos y no tienen una ló- 
gica que permita controles. Al final, si no se han 
producido errores, el dato se transfiere al fichero 
ARC, reemplazando así el anterior, y la subrutina 
se prepara para una nueva introducción. 
Obsérvese que, en este caso, no se ha previsto la 
petición de continuar, lo que se debe a la gestión 
de todas las introducciones a través de la data 
entry, que prevé una tecla funcional (FS = 7) de 
retorno al menú, haciendo inútil el coloquio. 


Generación de los archivos para el factor de 
crecimiento. El control del factor de crecimiento 
consiste en el examen comparativo entre las me- 
didas del niño y las medias. Por tanto, debe pre- 
verse un fichero «histórico» en el que memorizar 
para cada niño las medidas (peso, altura, circun- 
ferencia cráneo) a medida que se toman. 

La generación del sistema consiste en inicializar 
los diferentes ficheros para las personas. 

El diagrama no presenta ninguna particularidad, 
puesto que tiene un desarrollo análogo al utiliza- 
do en los demás programas, con la única diferen- 
cia de que, por comodidad, además de la gene- 
ración del fichero, se ha previsto la introducción 
del primer grupo de datos, los correspondientes 
al nacimiento. Sin embargo, se trata de una im- 
plantación realizada sólo por comodidad, y no im- 
plica ninguna modificación de lógica o de ges- 
tión. Sin embargo, obsérvese que para utilizar el 
programa se presupone la existencia de las ta- 
blas comparativas. Si no fuese así, en esta fase 
es necesario incluirlas, así como la preparación 
del correspondiente fichero (ver Gestión tablas). 
La estructura del programa permite gestionar un 
gran número de personas al mismo tiempo. Por 
esto es necesario prever una subrutina que, a pe- 
tición, presente sus datos principales. El diagra- 
ma de esta subrutina puede verse en la página 
2009. Como se ve, su empleo es muy sencillo, y 
se reduce para cada nombre a la comprobación 
de la existencia de su correspondiente fichero y a 
la presentación del último grupo de medidas. 


INTRODUCCION MEDIDAS 


Vuelve al 
menú principal 


— Fecha (día, mes, año) 
- Peso 

— Altura 

- Circ. cráneo 


Comprueba que la última fecha 
El control sobre la fecha introducida sea superior a la 
es necesario para memorizada anteriormente 
mantener el fichero 
en orden progresivo 


Al fichero y actualiza 
el registro 


En el diagrama no se ha indicado la función de variación de datos ya 
introducidos, puesto que es análoga a la de introducción. La única 
modificación consiste en la introducción por parte del usuario del número del 
registro a variar (en este diagrama lo calcula el sistema) 


(*) En el registro 1, además del puntero al último registro ocupado, también se memorizan el sexo (V/H) y 
los otros datos personales. 


2021 


2022 


GRAFICOS 


Del registro 1 toma MX 
y el flag del sexo 


TABV si el flag es V 
TABH si el flag es H 


La tabla se transforma en numérica 

en la matriz HT(x,x): 

la primera dimensión es el valor mínimo; 
la segunda, el máximo 


Principio bucle lectura 
medidas 


La fecha se transforma en meses 

a partir de la fecha de nacimiento 

y se memoriza en MR(RE). Los otros datos 
(peso, altura y c. cráneo) se transfieren 
según la elección a H(+) 


Dos curvas: máximo y mínimo 


Principio bucle datos 


Salta el control 
si es el primer registro 


IMPRESION (DATOS PERSONAS) Principio bucle de presentación 


(se han¡ omitido las cabeceras) 


y (O) 


Principio bucle de 
búsqueda de la edad 
y de las medidas en la tabla 


La edad no e y 


corresponde NO 


Busca el valor V1 


inferior a M(I) Hallada la edad los valores 


¡ i normal ¡ : 
para la interpolación OQ—> xy SI ormales correspondientes son 


PT(1,J) = Peso mínimo 
PT(2,J) = Peso máximo 
HT(1,J) = Altura mínima 

S] HT(2,J) = Altura máxima 
CT(1,J) = Circ. cráneo mínima 


CT(2,J) = Circ. cráneo máxima 


Este control debe repetirse 

para cada una de las 3 medidas, 
por lo que se necesitan 

3 variables: 

P15(x) para el peso 

P2$(x) para la altura 

P3$(+) para la c. cráneo 


(*) Los nuevos valores se presentan como sigue (el ejemplo se hace sobre el peso Para las otras 
magnitudes, el método es análogo) 


V = PT(1,K + 1) - PT(1,K) variación del punto Ka K + 1 
P = VIMT(K + 1) - MT(K)) variación unitaria 

D = M(I) - MT(K) desplazamiento edad 
PT(1,J) = PT(1K)+Dx*P valor interpolado 


Para el límite superior (PT(2,J)) hay que considerar PT(2K + 1) y PT(2,K) 


2023 


Gestión tablas. Como ya se ha indicado, la lógi- 
ca del programa requiere el uso de las tablas de 
los valores normales. En la página 2010 se ha re- 
presentado el diagrama de principio, y en las pá- 
ginas 2011 y 2012 su desarrollo detallado. Como 
las tablas son diferentes en función del sexo, la 
primera función es la selección de este paráme- 
tro. Según el sexo se establece el nombre del fi- 
chero, TABV para los niños y TABH para las ni- 
ñas. Determinado el fichero, puede pedirse su 
impresión o su modificación, línea por línea. 

Las funciones, resumidas en el gráfico de la pági- 
na 2010, se detallan en las páginas 2011 y 2012. 
La primera parte (introducción del sexo y la consi- 
guiente elección del fichero) es completamente 
idéntica, mientras que en la gestión de los datos 
hay notables diferencias. 

Al salir de la data entry sólo debe hacerse un bu- 
cle de 1 a 12 (o sea sobre las líneas) que sume 
los 6 campos para formar el registro, y lo escriba 
en el fichero. El índice del bucle (l) se utiliza para 
calcular los punteros N1 y N2 que identifican, pa- 
ra cada linea, qué elementos sumar de B$ (:). Por 
ejemplo, con | = 1 se tiene N1 = 1, N2 = 6, pues- 
to que el primer registro contiene la suma de 
B$(1) a B$(6). Esta suma la realiza el bucle más 
interno, con código L. Al final de este bucle se 
escribe el registro «|» (1, 2, etc.) hasta completar 
la memorización de la máscara (| = 2). 


Introducción medidas. Como se ha indicado, 
para cada niño deben memorizarse las medidas, 
tomadas a intervalos regulares, para compararlas 
después con las medias de las tablas. 

La subrutina de introducción de las medidas es 
análoga a las utilizadas en otros programas, con 
algunas implantaciones: 


m El primer registro del fichero, además de indi- 
car el número de registros escritos, contiene el 
sexo (V/H) y los otros datos del niño. 

" Después de cada data entry debe comprobar- 
se la fecha, puesto que las medidas deben 
memorizarse en orden temporal. 


Gráficos. La presentación del gráfico constituye 
una de las formas de proceso previstas en el pro- 
cedimiento (la otra es una forma tabular para po- 
ner de manifiesto los desplazamientos). 

El gráfico se presenta comparando los datos del 
niño con los valores máximo y mínimo previstos 
en la tabla de referencia. Como las medidas son 
tres (altura, peso, c. cráneo) pueden tenerse otros 
tantos gráficos. El diagrama corresponde a una 
sola magnitud, puesto que las otras se tratan de 
manera idéntica. 

Inicialmente se cargan los datos que servirán pa- 
ra trazar las curvas mínimas y máximas. 
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A continuación, con un bucle en el fichero NOM- 
BRE, se leen los valores correspondientes al niño 
al que se refiere el gráfico. Al final empieza la fase 
de presentación. Las funciones realizadas no se 
han representado porque están ligadas estrecha- 
mente al tipo de máquina, por lo que para el deta- 
lle de la parte gráfica debe consultarse el corres- 
pondiente listado. En el diagrama sólo se ha re- 
presentado la lógica de selección de las medi- 
das. Los datos de las tablas de referencia corres- 
ponden a edades bien determinadas, mientras 
que las medidas tomadas pueden no ser a inter- 
valos regulares. Por ello, puede suceder que dos 
o más medidas estén demasiado cerca entre sí 
para poder presentarse en la escala de tiempos 
prevista. Por tanto, es necesario un control que 
evite la presentación de medidas tomadas en in- 
tervalos demasiado próximos. Con ese objeto, se 
calcula la diferencia entre la medida «l» y la ante- 
rior «| — 1»: si esta diferencia es inferior a un de- 
terminado valor, el punto no se presenta. 


Análisis de las medidas. La presentación gráfi- 
ca de las medidas, debido a las limitadas dimen- 
siones de la pantalla, puede no ser suficiente pa- 
ra mostrar las evoluciones con detalle. Por tanto, 
en el programa se incluye una subrutina de im- 
presión que presenta, en forma tabular, todas las 
medidas tomadas, poniendo de manifiesto todos 
los desplazamientos con respecto a los valores 
medios. 

En la página 2015 se ha representado únicamen- 
te la parte de cálculo de la subrutina que presen- 
ta alguna dificultad. 

En particular, debe realizarse la interpolación de 
los valores para «alinear» los datos medidos con 
los de la tabla de referencia. En esta tabla hay las 
medidas para edades bien determinadas, mien- 
tras que las reales pueden haberse tomado en 
tiempos no exactamente iguales, y dada la rápida 
variación de las medidas en los niños, estos des- 
fases en el tiempo deben tenerse en cuenta. Por 
ejemplo, suponiendo que un punto de la tabla de- 
be corresponder a la edad de 3 meses, mientras 
que las medidas más cercanas son a 80 y a 95 
días: para poder comparar los datos hay que in- 
terpolar (linealmente) los valores medidos, obte- 
niendo así las medidas correspondientes a los 90 
días, que pueden compararse con las de la tabla. 
Las fórmulas para la interpolación se indican al 
final del diagrama. 

Finalmente, en el programa hay incluido un con- 
trol de desplazamiento (ver Análisis) que indica 
con los caracteres M, — y + la diferencia entre la 
medida y el valor previsto en la tabla. La determi- 
nación de la condición se obtiene comparando 
los valores medios de la tabla con la medida (o 
con el valor calculado por interpolación). 


RELACION PRINCIPALES VARIABLES - COMMODORE 64 


Calendario vacunaciones PT(x,x) =valores peso leídos en tablas 
CT (+, x) =valores de la circunferencia crá- 
neo leídos en las tablas 


NUC =número de campo de introducción 


DS a ll Li es Mido activada | ME(+x) =meses introducidos por el usuario 
_ md , e d A A P(x) =medidas del peso introducidas en 
A e disco por el usuario 
NOS(+) =cadenas usadas para la elección H(x) =medidas de la altura introducidas 
entre las funciones introducción, en disco por el usuario 
2000. comprobación (subruti- C(x) =medidas de la c. cráneo introduci- 
: das en disco por el usuario 
K9(+) =usadas para la comparación (sub- P1S(«) 
rutina 8900) _ , e 
K8 =flag de salida de la subrutina 8900 Poco E e 
NFS =nombre del fichero datos consi- 
derado Gráficos 
HT(x,:x) =valores leídos en tablas compara- 


Factor de crecimiento 


tivas 
NUC =número de campos de introduc- MT(«) =meses leídos en fichero datos per- 
ción en la máscara vídeo activada sonas 
DS =número de descripciones en la H(x) =valores leídos en fichero datos 
máscara vídeo personas 
=meses leídos en las tablas S$(+) =matriz de los símbolos gráficos 


=valores alturas leídas en tablas NFS =fichero considerado 


PENA CALENDARIO YACUNACIONES ; o ms q Ann 
E 


12 PEN ARA MATA 
14 FORT=1T0400':NEXTT: 

16 FOR T=1 TO 400: NEX 

19 DIM NO$(2),kK9(2> 

22 DIM TFC159, 1420), 


27? 1F 0PZ2=5 rn 5 M6 rage cm 
33 POKE TO E APRA EON 


A E AS NN REM 
JO (ET INN NN FEM 


ZO PEN RR do: 
1301 REM + MEN Pl 


1393 LW=-1 LA ne OOSEDES. á 


1307 REM 


A A IES A IS AA A AO 
12310 REM 


CRETA NN 
1315 59=53248:POKESS+. 1: 


3 =9 1 AS 241,4: NEXT1 
0PZs="" "cats a 


1336 IF OFZ$=SUf% THEN 
SCC0PZ4)=25 THEN GOSL 


3 5 THEN C2=C2-16: =0P2-1: id 
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X=XC : =OPZKSZ4 YO 

COSUB 11000 
PRINT"2A";VOS$COPZ) 

FOR T=1 TO 1000:NEXTT 
PORESS+21)PEEKCSS+21)AND234 
REM dos 

REM 


FOR J=1 TO NY:READ VOS$C(J>:NEXTJ 

REA AO otoloioIajÓK 

FOR II=1 TO NY 

X=XC:Y=1 18S2Z+YC 

GOSUB110090 

PRINT"2";YOSCII> 

NEXT 11 

RETURN 

DATAG,9,0,0,96,0,8,144,9,3,32,9 
DATA4,64,B,8,143,252,17,112,2,224, 129,252 
DATAD.63,08,0,€5,9,9,62,0,8,31,9 
DATAO,32,8,0,31,9,224,63,0,16,891,0 
DATA15,30,0,0,0,0,90,0,0,9,0,0,9,0,8 

DATA"1- |ESTION CALENDARIO" 

DATA"2- LISTA CALENDARIO POR NOMBRES" 

DATA"3- LISTA TODOS LOS CALENDARIOS " 

DATA"4- |ENERACION DEL SISTEMA" 

DATA"9- —IN DE TAREA" 

REM mola AYUDA MENII loo 

PRINTCHR$(147) :PRINTCHR$(14> 

POKESS, 255: POKESS+1,115:POKESS+39,6 
POKESS+40,6:POKESS+41.6 

POKESS+21,7:POKE2040, 13:P0KE2041,14:P0OKE2042, 15:POKES3+29,4 
FORN=8T062 : READO : POKE832+N, Q: NEXTN 
FORN=07062: READO : POKES96+N, Q: NEXTN 
FORN=0T062 : READO : POKE9609+N, Q: NEXTN 
POKES9+39, 1 :POKESS+40, 1 :POKESS+41,1 

POKE 53231,6 

A a A es E] 
FOR 1=1 TO 15:PRINT"MI 

Pra T -  _——> Ao; 
PRINTCHA$C(19) :PRINTTABC?> "OIIMBABIARAA/TO LS" 
POKESS+2,255:POKESS+3, 145: POKESS+4, 245: POKESS+5, 180 
PRINT"MIBBNDESPLAZA ABAJO: " 

PRINT"MMBIDESPLAZA ARRIBA: " 

PRINT"»OBBINTRODUCE OPCION ELEGIDA: " 

PRINTTABCS) "MOTA 14 174 ALA AMOO ALO 
CET_ R$: IFR$=""THEN1513 

POKESS+39,6:PRINT""" : RETURN 

DATA3, 255, 192,12.0.32,16.16.16,22,56,8,32,108,8 
DATA64,40,4,64,40,4,64,0,4,92,206,228.81,72,164 
DATAS1.206,228,81,66.164,93.46,143.64,9,4 
DATA64,40,4,64,40,4,32,108,8,32,56,8,16,16,16 
DATA12,8,32,3,255, 192 
DATA3,255,192,12,0,32.16,32,16,32,120,8,32,192,8 
DATA64, 120,4,64.32,4,64,9,4,92,206,228,21.72,164 
DATAS1,206,228,81,66,164,93,46,148,64,0,4,64,16,4 
DATAE4,120,4,32,12,8,32,120,8,16,16,16,12,9,22,3,255, 192 
DATAO,9,M,7,255,224,24,8,24,96,8,6,128,8,1,129,1,129 
DATA134,131.129,122,2,129,132.9.129,142.9.129 
DATA132,0,129,132,M,129,132,0,129,128,0,1,96,9,6 
DATA24.,8,24,7,255,224,9,9,9,9,9.B, /9,0.0,9,9.9 

REM FIN DEL MENU PRINCIPAL 

REM 

REM 4 PRESENTA MASCARA ok 

FEM 

FOR J=1 TO NUC 

Ate" 


X=DXCI) :Y=DY CJ) :GOSUB1 1000: A 
IF TPCJ><55 AND TPCJ)<54 THEN 2060 
X=CRCJ) =CW CJ) :GOSUB11000:PRINT"A";B4CJ) 


6 GOTO 2128 


N1sLCCJ) :N2=NDCJ> IF TPCJ)=1 OR TPCOJ>=2 THEN C$=NS$:COTO2065 
C$=A54 

IF Ni=1 THEN A$=C$:G0T02095 

FOR I=1 TO _N1-N2-1:A$=A$+C0$ :NEXTI 

IF N2=0 THEN A$=A$+C0$:G0T0 2095 

AF=A$+PDF 

FOR I=1 TO N2:A$=A$+"0":NEXTI 


3 XECACJ) E Y=C YC JO GOSUB 11009 


PRINT "MAS; "a" 

BS(J>="" pa 
FOR K=1 TO N1-N2-1 

B4cJ)=B$(J)+NS$ 

NEXT K 

IF N2=0 THEH BS$(J>=B$(J>+NS$:GOTO 2120 
BS(J)=B$CI)+PDS 
FORK=1TON2 : BG (J>=B$( J)+NS$ : NEXTK 

NEXT J 

REM 

RETURN 

REM 

REM 

REM 4% DATA ENTRY xo 

REM 

REM 

J=1 


REM 

NC=J :X=CX(NC) :W=CY (NC) 
CC=1 

GOSUB 3248 


15 *NEXTI 


IF FS=9 THEN RETURN 

IF FS=A THEN 3109 

IF FS>4 THEN 2219 

GOTO 23128 

REM CARACTER 

JaJ+1: ea LS THEN 3030 

GOTO 3 

ON FS SOTO 3139,3150,3170,3190 

IF J>1 THEN J=J-1:'G00TO 3049 

FS=B: J=NUC:GOTO 3040 

IF J<NUC THEN J=J+1:G0TO 3049 

FS=8:GO0TO 3828 

IF CO<LC(J) THEN S=1:C2C=CC+1:X=X+1:G0SUB 11090:00TO 3969 
FS=8:G00TO 3109 

IF CC>1 THEN S=-1:CC=CC-1:X=X-1:00SUB11090:00TO 3969 
FS=B:00TO 3035 


REM 

IF FS>8 THEN FS=8:GOTO 3069 
IF FS=8 THEN FS=B:G0TO 31009 
RETURN 


REM 

REM Mk LECTURA DE 1 CAMPO mk 

REM 

FSm8 

IF TPCNC>=4 THEN RETURN 

IF TPONC)=2 THEN GOSUB 9400 :RETURN 

IF MIDS$CBSCNC),CC,1)=PDS THENX=X+S:CC=CC+S 
DOSUB 110008 

GET AS: IF A$C>"" THEN 3338 

GOSUB11000:PRINT" ds"; :GOSUB11000:PRINT"A"¡MIDECBSONC) CC, 155 
pode 10 TO 45:NEXTT 
TPASC<AS)=190RASCCAS=ZODRASCCAS)=1470RASCCAS)=148 THEN 3330 
PRINT"Ma"; As; 

CA=ASCCAS> 

FOR I=1 TO 15 

IF TFCID*CA THEN FS=]:1=15:G05UB3630 : RETURN 
IF FS=39 THEN RETURN 

NEXTI 

IF TP(NCICO1 THEN 3450 

era DR CA=46 OR(CA>=4BANDCAC=57 > THEN3428 
IF CAC>46 THEN3459 

GOSUB 4278 

IF SWP=1 THEN 3419 

S=1:00SUB 3520 

IF CC=LC(NC> THEN RETURN 

CC=CC+1'X=X+1:G0T0 33109 


REM 

REM MM TRASFERENCIA AL BUFFER 4% 
REM 

IF CCu1 THEN SN$="":GOTO 3599 
SN$=LEFTS(BS(NC>,CC-1) 

TF COLC(NC> THEN DES$="":G0TO3619 
Ne=LCONCI=CC : DES2RIGHTECBSINCI NM) 
PSONCI=SN$+AS+DES 

RETURN 

REM 

REM ak COMANDOS me 

REM 


IF FS>5 THEN 3719 

RETURN 

IF FS=9 THEN GOSUB 13000 :RETURN 
IF FS=89 THEN GOSUB 4080: RETURN 
IF FS<8 THEN RETURN 

ON FS-9 GOSUB 3740,23910 

RETURN 


REM 
REM mM INSERCION AM 
REM 


IF CCRLCCUNCITHEN RETURN 

IF CCui THEN SH$="":G0TO3290 
SNS$=LEFTSCBSF(NC),CC=1) 
NaLC(NCI)-CC+1 :DES=RIGHTSCRGCNCO. NM) 
C$=BL$ 

AS=SN$+CF+DES 
BSINCISLEFTSCAS,LOCNCI) 

XA: a 

¡aer dde Y=CY(NC>:GOSUB 11900 
XxX: 

REM 

PRINT BS$(NC>:S=-1 

IF RIGHTS$CBS$(NC>,1)=PDS THEN 3789 
RETURN 


REM 

REM ARO BORRADO qdo 

REM 

IF TPCNCI<O1 THEN 3950 

IF MIDSCBSENC>,2,1=PDS AND CC=1 THEN RETURN 
IF CC<1 THEN RETURN 

IF CC=LCONC) THEN DES="":GOTO 3980 
N=LC(NCI-CC DES=RIGHTECBSCNCO NW) 
SN$=LEFTSCBSONO),CL-1) 

IF TPCNC)=1 DR TPONCI=2 THEN C$=NS$: GOTO 4010 
CS=AS$ 

ES(NCI)=3N$+DE$+0$ 

AS 

X=CXONCO ¿W=CWY CONCA :GOSUB 11000 

AAA: Y 
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PRINT BS$(NC) :S=1 : RETURN 


OD PREM de ALIMNEADOS + 


IF LC(NC>=1 THEN RETURN 


5 Ni=LC(NC)-CC+1 


IF CC=1 THEN B$(NC>="":G0T04199 
BSONCI=LEFTSCBG CNC CC1) 

IF TP(NCI=1 OR TP(NC)=2 THEN 4159 
FOR I=1 TO Ni 

BS(NC>=BL(HCI+BLE 


A NEXT 1 


GOTO 4190 
FOR I=1 TO Ni 

9 BSCNCIMCHR$C32)4BSNC) 

MEXT 1 

IF RIGHTSCESCNC), 1)=PDS THEN ¿PFCNCISBLSALEFTSCBFONCILOCNCI=1) 
X=CXONC) :Y=CY CONC) :GOSUB 11909 

PRINT BS(NC) “RETURN 

REM 

REM 

REM 

SHP=0 

IF CCui OR CC=LCCNC) THEN ShIP=1: RETURN 

FOR I=1 TO LC(NC) 

IF MIDSCBSCNCI,1,19=BL$ THEN I=LCCNC):SWP=1:PETUPN 

NEXT 1: RETURN 

REM 

REM 

REM 

REN NN IMPRESION TODOS LOS CALENDARIOS 

GOSUB 6090: OPEN4, 4 

GOSUB 7890 

X=10:Y=9: GOSUB11900:PRINT"MCa1 ED! PRESENTACION EN VIDEO" 
Y=+2:00SUB11000:PRINT"BC2RO!! IMPRESION EN PAPEL" 
X=46:V=W+3:00SUB11000:PRINT"MIELIJA ":X=22 

GETSC$: IFSC$=""THENGOSUB11000:PRINT"«uP":GOSUB11090:PRINT" WM ":GOTOSO22 
SC=VAL (SC$) : IFSCCIORSCI2THENSO22 

NF$="VAC":GOSUB6209 

PA=1:G0SUB 6899 

INPUTH2, ARS 

MAL CARL) 

Yie1:PRINTHOS:PRINT"3a LTS 77 TL ALTA ARA N MNIAO 

FOR RE=2 TO Mx 

PRINT"H" 

Yi=y1+7 

PARRE : GOSUB6998: INPUTH2. AAS 

BS4(10)=RIGHTSCARS,1>:1F B$(10)="9" THEN Y1=W1-7:G0T0 5075 
ES(1)=LEFTSCARS, 10) :BS(2)=MIDSCAAS, 11,15) :BS(3)EMIDSCARS, 26,20) 

BS(4)=MIDSCAR$, 46,8): BS(5)=MIDFCARS, 54,8) 

G=VAL(LEFTS(B$(4),2)):M=VALCMIDSCB$(4),3,2)): AVAL CRIGHTS(BFC4),4)) 
GO=VAL(LEFTS(BS$(5),2)) :MM=AL(MIDECBF(5),3,2)) : AA=VALCRIGHTSCBF CS), 49) 
IF SC=2 THEN CMD4:PRINTCHR$(17) 

IF RE=2 AND SC=RE THEN PRINTOARSC19) 5 ULTRA O A /70" :PRINTIPRINT 
PRINTTAB(2)"/OMBRE —: ";BS$C1 


PRINTTABC2) "XACUNA : Mica) 
PRINTTABC2)"/OTAS : " BSC3) 
PRINTTABC(2)""N FECHA :"G"/"m"/"A 


PRINTTABC2)>""ROXIMA  :"GG"/"MM"/"AR 

IF SC=2 THEN PRINTR4:GOTO 5075 

IF W1<15 THEN PRINT"MA":GOTO 5875 
Wi=1:2=6:Y=22:G05UB11000:PRINT"MPULSE UNA TECLA PARA CONTINUAR" 


POKE198,B8: WAIT 198,1:PRINTHOS:PRINT" Ma NILO 507 TL ALTA AR ASS 
; 


NEXT RE 

X=2:Y=22:G0SUB11000:PRINT"PULSE UNA TECLA PARA VOLVER AL MENL" 
POKE198,0:WAIT 198,1 

GOSUBE4B0 : GOSUBE6BA : CLOSE4 

RETURN 

PREM oo do ll e o o o e lo e 

REM 40 IMPRESION CALENDARIO NOMBRE ok 

GOSUB 7009:NO$="" 

X=8:Y=7:GOSUB11000:PRINT"BR 1-72 TL ANITA AA 
X=17:Y=12:005UB11000:PRINT"M========-" 
X=15:Y=11:005UB11000: INPUT" e" ; NOS 

NÉLENCNOS) 

IF N=A THEN 5508 

IF Nc=10 THEN 5511 

%=1:Y=18:G0SUB11000:PRINT"EL NOMBRE INTRODUCIDO NO ES DE LA" 
X=1:V=v+1:G0SUB1190900:PRINT"LONGITUD PREVISTA EN EL FICHERO DATOS" 
FORT=1T01000:NEXTT:PRINTHOS : GOTOS581 

IF N=10 THEN 5513 

FORK=1TO0 19-N:NO$=NO$+CHP$(32) : NEXTK 

PRINTHOS : GOSUB70809 

4=10:v=9:G0SUB11000:PRINT"B<2A1B0H PRESENTACION EN VIDEO" 
Y=+2:G0SUB11000:PRINT"EC 22801 IMPRESION EN PAPEL" 
X=16:Y=+3:GOSUB11000:PRINT" ELIJA ":X=22 

GETSC$: IFSC£=""THENGOSUB11000:PRINT" MER" :GOSUB11000:PRINT" WN ":GOTOS522 
SC=VAL(SC$) : IFSCC1ORSCI2THENS522 

GOSUB6900 : OPEN4, 4 

NF$="WAC" :GOSUBE200 

PA=1: INPUTR2, ARAS: MX=VAL CARS) 

Y1=1:PRINTHOS:PRINT"Ba 3VL70377 TL ALTA: HNOS 
FL=1 

FOR RE=2 TO Mx 

PASRE : GOSUB6860 : INPUTR2, MAS 
NMS=SLEFTSCARS, 10): INDE=RIGHTS$CARS, 1) 

IF NM$<ONOS OR INDS="9" THEN 5690 

YWiev14+7:FL=FL+1 

PRINT"M" 


8028 
2039 
8035 


3090 


B£C(2=MIDSCAR$, 11,15) :B$C3=MIDSCARS, 26,20) 
B$(4=MIDS$CARAS.46,8):ESCSI=MIDIFCARS. 54,8) 
G=YAL(LEFTSC(BLC(4),2)):M=WAL(MIDECEGC43,3,2)) :A=VALCRIGHTECBFC4),4)) 
GG=VAL(LEFTS(B$(5),2)) :MM=ALC(MIDECBGCSI, 3,2): AA=SYALCRIGHTSCB$05,9)) 

IF SC=2 THEN CMD4:PRINTCHR$(17) 

IFFL=2ANDSC=FLTHENPRINTCHR$C 1855 "ALO RAMO A ARO "5 MESCME>:PRINT: 


5 PRINTTAEC2>"/OMBRE 2 5 H0S 


PRINTTAB(2)">ACUNA O "3B$C(2) 

PRINTTABC2>"DTAS 2" B$(3) 

PRINTTABC2)""N FECHA :"G"/"Mm"/"A ; 

PRINTTABC2)""PROXIMA  :"G6"/"mm"/"AR 

IF SC=2 THEN PRINTH44:GOTO 5600 

IF Y1<15 THEN PRINT"NM0":GOTO 5609 
Y1=1:X=6:=22:60SUB11090:PRINT"NPULSE UNA TECLA PARA CONTINUAR" 
Ea 198, 1:PRINTHOS :PRINT"A 317057 TL ALO Ra: "¡NOS 
NEXT RE 

A LINA TECLA PARA YOLYER AL MENU" 
POKE193,0:WAIT 198,1 

GOSLIBE400 : GOSUBE600: CLOSE4 

RETURN 

REM 

REM 4% GESTION DISCO 44% 


REM APERTURA CANAL COMANDOS 


REM n= 
OPEN1,8,15 
RETURN 


CLOsEZ 


a Ri 
REM APUNTA AL REGISTRO 


REM ron : 
R1=PA:R2=0 

IF R1>256 THEN R2=INTC(PA/256):R1=R1-2564R2 
PRINTR1, "P"CHA$(3+96)CHRSC(RI)CHRSCRZICHAGC1) 


Q A 


REM ds CARGA e DATA 

IF 0PZ=5 THEN 7004 
LsLENCYVOS$(OPZ>9-3:L$=RIGHTSCWOSCOPZ3+,L>:0Z2=0P2:1F OPZ=0 THEN 7005 
Us="x0Z "+STRECOZI+" " 

P=(30-L)/2:P$="":FORK=1TOP:P$=P$+" ":NEXT K 

PRINT"3M"; :PRINTCHR$(14> 


3 PRINT"MZA mr.|... “DICIONES -ORUM, 4.4." 
" 


PRINT"MAT "5US; "Sa 
PRINT "MAT au ;Ps; 
IF 0P2=9 THEN PRINT"35 Ma"; 
PRINT" 0 ;LS$; "PS 
PRINT"IIBDDDDI DS » 
X=1 :Y=22 : GOSUB 1 1098 : PIN AA—AAAAAá 22 
iS 1000:PRINT"Aa-=]-L+ 1]: 215%" 
mM 


IF 0PZ=08 THEN RETURN 

ON OPZ GOTO 7058,7110,7110,7110,7110 

REM DN=NUMERO DESCRIPCIONES-NUC=NUMERO CAMPOS DE INTRODUCCION 
LV=15:G0SUB20000: DN=10:NUC=10 

FOR I=i TO DN:READ D$(1>,DXC(1),DwC1>:NEXTI 

FOR l=1 TO NUC:READ TPCI>,LOCIA NDC 12, COX 19 CCT 


RE 
aa Ak INTRODUCCION CALENDARIOS se R 


MX=MX+1 
IF Mx<50B THEN 8030 


RRENE HOS:PRINT"FICHERO DATOS AGOTADO":PRINT"PULSE UNA TECLA PARA YOLVER AL 
" 


POKE 198,0:WAIT 198,1:G0SUB 6400: GOSUBESE690 : RETURN 

PRINTHOS :GOSUB 7000 

*x=9:Y=5: GOSUB11000:PRINT"25/1 LT =3F7/00d00 4150" 

%=7:=7:G0SUB11900:PRINT"BLCALENDARIO /. M1"; MX-1 

Bs$(10)="1":TPC180)=4 

GOSUB 2000:GOSUB 3000 

IF FS=6 OR FS=9 THEN 8039 

IF FS=7? THEN GOSUB 6440: GOSUBE600 : RETURN 

IF YALCB$(5))3712 OR VALCB$(8))12 THEN GOSUB 9158:GOTO 8855 

IF VAL(B$(4))>31 OR YALCB$(7)>>31 THEN GOSUB 9150:G0TO 8955 

IF VALCB$(4)><=8 OR VALCBSC7))<8 THEN GOSUB 9150:G0TO 8955 

O OR WAL(B$(8)><6 THEN GOSUB 9150:G0TO 8055 
=" 
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8095 FORK=1T010: ARS=AAS$+B$(K) : NEXTK 

8105 PA=Mx:GOSUB 68099 

8110 PRINT*2. ARAS 

8114 REM ACTUALIZA EL PRIMER PEGISTRO 

8115 PA=1:GOSUB 6809 

8120 PRINTR2,STR$C(MX) 

8125 GOSUB 5600:NF$="WAC" :GOSUB6200 

81598 GOTO 8018 

BIOD REM ae ele 

8500 REM 4% VARIACION CALENDARIOS xk 

8530 PRINTHOS : GOSUB7000 h 

8557 B$(33=MIDSCAAS, 26,20) :E$C43=MIDFCARS, 46,2) 

8559 BS(5)=MIDSCARS, 48,2): ES16)=MIDSCAR$.50,4) 

8561 B$C7)=MID$CARS$,54,2):B$(3)=MIDS$CAAS,56,2) :BS(9)=MIDFCARS, 58,4) 
8563 B$(10)=RIGHTSCAAS, 1> 

8565 FORI=1T010:TP<I>=5:NEXTI 

8566 X=14:Y=5:G005UB11000:PRINT" DA 4237 81 To" 

2567 X=7:Y=7:G0SUB11000:PRINT"E:CALENDARIO /.M";PA-1 

8579 GOSUB2009 

8574 GOSUE 3090 

8575 1F F35=6 OR FS=9 THEN OPZ=5:GOSUB7090:G0T08567 

8577 IF FS=7? THEN 8598 

8573 AAsS="" 

8590 FOR K1=1T010:AR$=AAS+BSCK1):NEXTK1 

8585 GOSUEGSOO :PRINTAZ, ARAS 

85980 REM 

3595 GOSUBE6600 : GOSUB6400 : RETURN 

2600 REM 4% COMPROBACION xk 

£605 PRINTHOS : GOSLUIB7009 

2619 B$(33=MIDICARAS, 26,20) :BF$(4=MIDSCARS, 46,2) 

2615 BS(S)=MIDSCARS, 48,2): ES$(6)=MID$< ARAS, 50,4) 

32620 B£(7)=MID%CAAS,59,2) :BSCB2)=MIDSCARAS, 56,2): BEC9)=MIDECARS, 58,4) 
8622 B$(10)=RIGHTSCAR$, 10) s 

8623 FORI=1T09:TPC1>=5:NEXTI 

8630 *=10:W=5:G00SUB11000:PRINT"P LIS 57 Ml" 

2635 X=7:W=?:505UB11000:PRINT"E33ALENDARIO /.M";PA-1 

32640 X=7:Y=21:G605UB11000:PRINT"N_7 = PROXIMA INTRODUCCION" 
2644 NUC=3:GOSUB 2000 

B645 GOSUB 34900 

3650 IF FS=6 OR FS=9 THEN OPZ=S:GOSUB7080:GOTO262 

8635 IF FS=7 THEN 8690 

2657 IF FS=5 THEN 2645 

B699 X=7:Y=21:GOSUB11000:PRINT" "RETURN 
8900 REM 4% ELECCION DE INTRODUCCION-YARIACION-COMPROBACION 4 
B302 GOSUBEDOO 

85904 NF$="WAC" : GOSUES200:PA=1 : GOSUEGIDO : INPUTHZ, ARS: Mi4=YALCAAS) 
2905 PRINTHOS : GOSUB7000*NOFC1)="":N0$(2="":N=0:Y=0 

B910 X=7:W=7?:GOSUB11000: INPUT"AJT 1-7: MU NOECLO 

8914 Y=v+1:GOSUB11000: INPUT" BABA: MA NOELZO 

2916 N=LENCNOS 17): W=LENCHOSC255 : IFH=0 AND Y=0 THEN 2905 
3917 IF HO$C1>="*" AND NOF$(2="X" THEN 3000 

3915 IF ¿N>10 OR W91S5>0RCN=1ANDY<> 19 THEN COSUE9156: 60708905 
8920 IF V=15 THEN 8924 

8921 FOR K=1T015-Y:NO0$(2)=N0$(2)+CHR$(32) : NEXTK 

9924 IFN=10THENS930 

8925 FORK=1T010-N: NO$(1>=N0$(1)+CHR$(32) : NEXTK 

8930 er MK PRINCIPIO COMPARACION mk 


8934 FOR RE=2 TO Mx 

3935 PASRE : GOSUBE300 : INPUTRZ, RAS 

B936 K9(1)=0:kK9(2)=0:k8=8 

28937 BS$C1>=LEFTSCARS, 10) :B$(2)= MIDICAAS, 11,15) :E$(10)=RIGHTSCAAS, 1) 
8938 IF B$(10>="0" THEN 8950 

8939 FOR K=1 TO 2 

B940 FOR K1=1 TO LENCB$cK)) 

8941 C1$=MIDS$CNOSCK),K1,1):C28=MIDS$C(BS(K),K1,1> 

8942 IF C1$=C23% THEN K9(K)=K9(K)+1:G0T08945 

8943 IF in CHRE(32) OR C2$=CHR$(35) THEN K9C(K)=K9CK)+1 


NEXT K1 
8946 Ao K:2=12:v=20:GOSUB11000: PRINT"Al 00 A A 1 
8947 NEXT K 
8943 IF K9C1>=10 AND K9c2=15 THEN RE=Mx:K9(1)=0:K9(2=0:K8=1:G0T08950 
Ed ed ad THEN K9(1)=0:K9(2)=0:K8=2:GOSUB 2600: REM COMPROBACIÓN 
8953 IF K8=1 THENSS0D:REM * VARIACION *k 
2955 IF K8=0 THEN 2000:REM HUEYA INTRODUCCION 
8956 Etna THEN GOSUE6600 : GOSUB6490 : RETURN 


9150 REM RUTINA ERROR 

39152 x=9:Y=24:GOSUB110909:PRINT" BT NT 1 ATP" 
9154 FOR T=1 TO S5OB:NEXT T A 
9156 X=9:=20:G0SUB11060:PRINT" "RETURN 
A 

10095 REM 

10010 DATA 145,17,29,157,148,133,136,13,25,134,135.9,0,0,0 
10014 REM FRA OPZ=1 LS OR 

10025 DATA"WaANOMBRE",7,189 

10026 DATA" 2VACUNA",7?,12 

10027 DATA"WNOTAS",7,14 

10028 DATA"WFECHA",7,16 

10029 DATA"/",19,16 

10030 DATA"/",22,16 

10031 DATA" SPROXIMA",7,18 

10032 DATA"/",19,18 

10033 DATA"7",22,18,"mINDICADOR :",7,20 

10034 DATA3,19,0,17,10 

10035 DATA3,15,9,17,12 

10036 DATA2,20,0,17,14 

10037 DATA1,2,0,17,16 
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3 PRINTTABCOO)"MACESA UP 


A PRINTTAECS) "MA FS” 


DATA1,2,B,20,16 
DATA1,4,0,23,16 
DATA1,2,0,17,18 
DATA1,2,0,20,183 
DATA1,4,8,23,18 
DATA5,1,0,21,20 
REM 


REM Ao POSICIONADO EN X.Y dodok 


POKE 211,X 
POKE 214,7 
S1338732 
RETURN 


REM 
Es dk GENERACION SISTEMA xk 


5 GOSUB 7000 
%X=7:Y=6:G0SUB11000:PRINT"NGENERACION EN CURSO" 


'=+2:60SUB11900: INPUT"CONTINDO <SI/HO) MRE 


de R$="NO" THEN RETURN 
1F R$<>"SI" THEN 12013 


-GOSUB 6008 


ARS="1" 


FOR K=1 TO 61:RA$=AAS+"4%" : NEXTK 


2 REM FORMACION REGISTRO TIPO 


OPEN2,8,3,"0:YAC+L,"+CHR$C(E3) 
PA=1:GOSUB 6800 

PRINTR2, ARAS 

REM PREPARA PRIMER REGISTRO 


X=9:'=13:G0SUB11009:PRINT"BL,— 1-7 810 17 -A TT" 


GOSUE6600 : GOSIUBE400 


X=2:W=+3:G0SUB11000:PRINT"PULSE UNA TECLA PARA YOLWER AL MENU " 


POKE 198,0:WAIT 192,13 
RETURN 


A ió 


REM ak AYUDA ao 
REN 


POKE 53280,6:PRINTHOS;: MEETS 142); 
HT: 


PRINTTAECS)"MACRSE RIGH 
PRINTTAB(S>"MACRSA LEFT 


PRINTTABCS) "MBACRSR DOLN 
PRINTTAECS) "MA Fi” 
PRINTTABCOI "MA FS” 


PRINTTABCS) "Mah F7” 


¡MUEVE A DERECHA 


MUEVE A IZQUIERDA" 


MUEVE ARRIBA 
MUEWE ABAJO 
ANLILACION 
INSERCION 
BORRADO 
RETORNO AL MENU 


PRINTTABCS) "MA FS” INTRODUCCION 
a o NTTABCS)"MALCTRL+Y AYUDA 
PRINTTAECS) "MBARETURN : EL ALINEAR 
PRINTTAEC(6) "MAPULSE UNA TECLA PARA VOLVER" 


GETR$: 1FR$=""THEN13066 
PRINT HO$:POKE 53220,14 
RETURN 

REM RESTORE DATA 

RESTORE 

FOR I=0 TO 62:READ D:HEXTI 
FOR I=1 an NW:READ X3:NEXTI 
FORK=1 TO 

FOR a To” 62:READ D:NEXTI 
NEXT 

IF Lvea THEN RETURN 

FOR I=1 TO LW:READ LYS$:NEXTI 
RETURN 
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E Y 
zu Ren PINAR kai 


20 GE=YALCLEFTSCES 32,200 MM=YALCOMIDECRECDO, 2.209: RA=YALCRIGHTSCE 


525 


bp PáA=1 :GOSUEE: 


50 sin ME (20), ¿HT¿2,125, MTC, MTECZD0,) HE 209 M1 79,5302550, 005) 


22 b=22 0 M=172:5HM=310 
REM 44 RUTINA GRAFICOS 444 


2 PRINT"0IA" :FOKES3220.6 


INFUT "NOMBRE PERSONA”; HOS 


y HES=LEFTS$C(NOg, 35 


GOSUB 6000 :GOSUB 6200 

INFUTR+1,A,E+,C.,D 

IF A<CO62 THEN 140 

PRINT"0":PRINTES :PRINT"AIMFICHERO HO HALLADO" 
FRINT"ADMMMFULSE UNA TECLA PARA CONTINUAR" 


5 POKE1923,0:WAIT193, 1: COSUEGEDO : GOSUEE4BO: GOTO 160 


REN 

PRINT"SBELIJA EL GRAFICO : * 

PRINTTAEC10>"M1 = ALTURA " 

PRINTTABC16"M2 = PESO ya 

PRINTTAEC10)"M3 = C.CRANEO" 
3 INPUT"BMMCUAL  : "5% 


IF Y<1 OR Y>3 THEN 100 
08: INFUTRZ, ARAS 


GOSUE 7000 


GOSUB E681 
IF ESC2I=SUAM THEN ESccI= o 
TF ESC2I=" 1" THEN ESC27="H" 
HES="TAE"+BF(2) COSUE 6200 

FOR I=1 TO 12 


b PA=I : GOSUESSOO : INPUTRZ, ARAS 


MTC =VALCLEFTECARE, 23) :MT9C12=LEFTECARS. 2) 


2 IF 4221 THEN 258 


HTC1) DD=VALCMIDECARS, 3, 3)) 


6 HTL2) 12=YALOMIDICARAS.6,372:60T0 266 


IF Y<52 THEN 262 
HTC 1, 2 =YALCMIDECARS. 9,4) 
HTC2, I>=WAL<MIDECARS. 13,4) :G0T0266 


2 HTi1. I2=YALCMIDECARS. 17,27) 


HT<2, 0 =ALCMIDECARAS. 19,25) 


5 NEXT 1 


COSUEE600 

NFS=SLEFT+(EF11),3) : GOSUECZ0D 

FOR RE=2 TO Mx 

PA=SRE : GOSUIEGEOD : INPUT, ARS 
CO=VALILEFTSCAAS, 295 :M0=WYALCMIDSCARS, 3,25: AB=VALCMIDECARE 5,29) 
RPSAD-AR : MP=M0-M1H1: GP=G0-G6G 

IF GP<15 THEN P=0 

IF GP>15 THEN P=1 

MECRE)= 124AP+MP+P 


HERE, VAL MIDECRAS, 7,29): G0TO325 
2 THEN 320 
ACRES=UAL CMIDECARS, 19, 43):60T0325 


Y HERE +=YALCMIDECARE., 14,275 


NEXT RE y 
GOSUE 66065: GOSUB £400 

COSUB 11009 

GOSUB S00g 

REM dk EJES dk 

A=al 

FOR Y=8 TO YH 

COSUB 10008 

NEXT Y 

Y=9 

FOR =x0 TO xM 

GOSUE 109009 

NEXT Xx 

Fiz CxmM-407472 

e 15009 

I= 

Fw=INTCWMIME TIO 

A1=%40: YI=HTC IT, DA: Y=1 

FOR J=2 TO 12 

A AA 

FOR X=X1+1 TO X2:GOSUB10000 : NEXTX 
FOR Y=1+1 TO Y2:GOSUE100B9 : NEXTW 
X1=X2: Y1=Y2 

NEXT J 

I=1+1:IF I=3 THEN 439 > 
GOTO 372 

REM 

WISH 1 X1=3%0 0 1=1 

FOR J=2 TO Mx 


2 REMECIORENARO VES HC IRF 


FOR X=X1+1 TO x2:GOSUB10060 : NEXTx 
FOR Y=Y1+1 TO Y2:GOSUE1OODO : NEXTY 
xi=42:71=42 

NEXT J 

GETAS: IFAS$="" THEN 500 


y FOKE 56576, (PEEK(S6576)ANDZS2)0R2 


POKE 53265: PEEK(53263)AND223 


B POKE 33272.21 


PRINT"S";5:CLR:LOAD"MEDICINA",S 


50D FEM 4 PREPARA H-E 4% 

5005 FOKE 56576, (PEEK(S6S76)AND252)0R2 
5610 FOKE 53272.8 

5015 POKE 52265. PEEK¿523265)0R32 
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5020 FOR 1=24576 TO 32575'POKEI.0:NEXTI 
5025 FOR I=16324 TO 17383: FOKEI, 230: NEXTI 
5030 REM 230=DIBUJOS EN AZUL 

5035 FOR 1=9 TO 7:12 1>=21 7-1): MEXTI 
5040 pa 


6010 OPENI/ 8,15 
6615 RETURN 
6200 OPENZ,8,3,NF$ 
5210 RETUEN 
6400 CLOSE1: UTN 
6690 CLOSE2:RETU 
6300 REM APUNTA AL REGISTRO 
6205 Ri=PA:R2=0 
6210 IF R1>5256 THEN R2=INT(PA/256):R1=R1-2564R2 
6215 PRINTR1. "PULHRGC3+IE)CHRE CRIS CHRI CRI CHE LO 
6320 RETURN 
SLo_ REM ee 
7000 REM EXTRAE PUNTERO hi cla % 
7065 ESc1o=LEFTSL ARAS, 6) EF 020 =MIDECAAS. 7 10: Pg =MI DG LAR 3. 6) 
7010 ESc4=MIDFCART. 14,3): ES05)=RIGHTSCARAS, 4) 
7015 Mi=ALCEICGI 
7428 RETURN 
10009 REM SUBRUTINA DE TRAZADO 
REM 


10003 2=YM-%w 

10005 AAA 
10010 POKE PL,FPEEKCPL OR Mi2cx4AND? 

10015 pe 


11000 REN RUTINA BUSQUEDA MAXIMO 

11003 Mc1=0:MMc2=0 

11010 FOR I=1 TO 12 

11015 IF HTc1. I22mc1 THEN Mc12=HT 1,15 
11029 IF HTc2, 1251102) THEN Mc29=HTC2, 1) 
11025 MEXT 1 

11030 RETURN 

15000 REM 4% COMPLETA EJES Ak 

15003 Y=(WHM-70)2 

15610 FOR %=13 TO 26:GOSUB10000: NEXT 
15015 IF Y>80 THEN 15500 

15020 Y=YM-Y0:G0TO 15010 

15500 REM 

15510 FOR J=1 TO 12 

15515 X=MTCJI)AFX+X0+1 

15517 FOR '=3 TO -3 STEP-1:COSUB10000: NEXTW 
15520 NEXTJ 

15530 REM 443 IMBOLOSAR 

15532 S$="0":X=12:W=169: IN=2: G0SUB16000 
15934 S$="50":4=12:Y=97: IN=2 : GOSUB16090 
15536 S$="100":X=12:W=15: IN=2: GOSUB16000 
15540 S$="GRAFICOS FACTOR CRECIMIENTO" :4=32:'1=3: IN=0:G0S5UE 16000 
15545 FOR W=1 TO 12 

155947 MT$(1)="NA" 

15550 Sé=MT$CW):XSMTCMOAF A+ RO+1 3178: 1N=2 
155535 GOSUE 16009 

15560 NEXT 

15700 RETURN 

16000 REM LECTURA SIMBOLOS 

16005 S9=LENCS$):1F S9<=0 THEN RETURN 
16010 IF S9=1 THEN S$(39)=5$:G0TO1£030 
16015 FOR I=1 TO S3 

16020 S$cI>=MIDSCSE, 1,1) 


NEXTI 
16030 GOSUB 6000:NF$="SIMB":GOSUB 6200 
16035 FOR J=1 TO 53 
16040 S=ASC(SLCJI) 
160945 IF 5<32 OR 5790 THEN 16095 
16050 PA=S-31:G00SUB 6909 
16055 INPUTH2, ARS 
16060 CC17=WAL(LEFTSCARS, 35) 
16062 C(2=WAL¿MIDICARS, 4,395 
16064 C3I=YALMIDECARS. 7,35) 
16066 Cc4=WAL(MIDEC ARE, 10,375 
16069 TT TI 
16070 FOR I=1 TOS 
16075 SE=24576+1 404 WAND248)+(YAND7 + 0 4ANDIO4 >) 
16030 POKE SE,.CCI> 
16085 A a 


16091 ie “Inzo THEN 2=X+3:W=5:G0T0 16095 
16092 W="+IN 

16095 NEXT J 

16100 GOSUEG60O : GOSUEE4DO 

16105 RETURN 
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CF 


DOEEI AARRR AREA ORAAAR 
1 FEM + FACTOR DE CRECIMIENTO % 
2 REMAIN 


REM ARERARIAARAR MAL AAA 


FORT=1T0400:NEXTT:PRINT"CR";:%=7:Y=10:60S5UB11000 

PRINT"INTRODUCIR EL DISCO DATOS":PRINT"MBBABBDDABD NY PULSAR UNA TECLA" 
FOR T=1 TO 400:NEXTT 

CETR$:1F R$="" THEN 14 

DIM MTC125,HTC2,12),PTC2,12),CT(2,12):ME(20),PC20),H(20),C(20> 


19 DIM P1$c20>,P2$(20),P2$(20> 

20 DIM B$C25),TPC25),L0C(25),ND(25),0X(25),04(25),D%(25),DY<25> 
21 DIM TF(15),D$(25),40$(20),F1$(4),LF(4) 

22 Bl$=" ":PDI=".":ASE="-":NS$="4":SU$="M":GIUE="M":HOS="77" :SLG="/" 
23 LES =CHRS (133) NV=6:XC=10:Y0=6:52=2:POKE650, 128 

24 E 

25 PRINTHOS: GOSUB1300 : PRINTHOS : PRINTCHR$(142):REM xk MENU” ok 
27 IF 0P2=6 THEN CLR:LOAD"MEDICINA",8 

30 GOSUB20000 

35 FOR I=1 TO 15:READ TF<I>:NEXTI 

120 ON OPZ GOSUE 8000.5000,5500, 16000, 12090 

130 REM 

150 GOTO 25 


LO REA ARMAR ARA A 


DO REM dao 


1301 REM * MENU. PRINCIPAL * 

ER REM AA alolaloIiodoK 

1303 LW=-1 

1305 TM MENU ":O0P2=0:W0O$C0PZ3=" ATM == 7/1P":GOSUB 7000 
1307 REM 

1309 DPZ=1 

1310 REM 


REN 
1315 53=53248 : POKESS+21,1:POKE2040, 13 
1316 RESTORE 
1318 FOR I=0 TO 6€2:READA:POKES32+1,1:NEXTI 
1321 POKESS+39,1:C1=75:C2=111 
1323 GOSUB 1363 
1324 GOSUB 1396 
1327 GET OPZ$:IF OPZ$="" THEN 1327 
1333 IF OPZ$=GIU$ THEN C2=C2+16:0PZ=0P2+1 :GOSUB1363 
1336 IF OPZ$=SU$ THEN C2=C2-16:0P2=0P2-1:GOSUB1363 
1339 IF OPZ$=US$ THEN 1381 
1342 IF ASCCOP2$)=25 THEN GOSUB 1456:G60T01395 
1345 GOTO ia 
1363 REM * 
1366 IF Coc111 THEN C2=C2+16:0PZ=0PZ+1 RETURN 
1369 IF C27191 THEN C2=C2-16:0P2=0P2-1:RETURN 
1372 POKESS,C1:POKESS+1,C2 
1375 RETURN 
1378 REM kk 
1331 Xx=XC:W=0PZKSZ+wC 
- 1384 GOSUB 11009 
1387 PRINT"3h";vOS$(0PZ> 
1399 FOR T=1 TO 1000:NEXTT 
1392 POKESS+21,PEEK(S5+21)AND254 
1393 RETURN 
13949 REM dde 
1396 REM 
1399 FOR J=1 TO NW:READ YO$(J)>:NEXTJ 
A is 
1405 FOR Il=1 TO NY 
1408 X=XC:W=I1I4SZ+YC 
1411 GOSUB110600 
1414 TM vOS$CII> 
1417 NEXT II 
1420 RETURN 
1425 DATAD.9,0,0, 96, B,0,144,0,3,32 
1427 DATA4,64,0,8,143,252,17,112, 2,224,129,252 
1429 DATAO,63,0,0,€65,0,0,63,8,0,31,0 
1431 DATAO,33,0,6,31,0,224,63,0,16,81,0 
1433 DATA15,30,0,0.0,06.0,0,0,0,0,0,0,0,09 
1444 DATA"1- +NTRODUCCION DATOS" 
1445 DATA"2- XHRIACIONES " 
1447 DATA"3- ,MPRESION " 
1449 DATA"4- LISTAR PERSONAS" 
1450 DATA"S- |ENERACION" 
1454 DATA"0- —IN DE TAREA " 
1456 REM ao AYUDA MENU dolo lololo lo 
1459 PRINTCHR$<147):PRINTCHR$(14) 
1462 POKESS,255:POKESS+1,115:POKESS+39,6 
1465 POKESS+40,6:POKESS+41,6 
1468 POKESS+21.,7:POKE2040, 13:POKE2041,14:P0KE2042, 15: POKESS+29.4 
1471 FORN=0T062 : READO : POKE832+N,Q: NEXTN 
1474 FORN=9T062 : READO : POKES9I6+N, Q: NEXTN 
1477 FORN=0T062 : READA : POKE960+N, Q : NEXTN 
14380 POKESS+39, 1:POKESS+40, 1:POKESS+41, 1 
1483 POKE 53281,6 
IIIPRINT A AAA == 1 A 3 
1489 FOR I=1 TO 15:PRINT"MI ' 15 NEXTI 
DARIA o O 
1495 PRINTCHR$<19):PRINTTAB<?> "MIDI 8 TO LON 0" 
1498 POKESS+2,255:POKESS+3, 145: POKESS+4,245:POKESS+5, 130 
1501 PRINT"MWMIBEDESPLAZA ABAJO: " 
1504 PRINT"AMBBIDESPLAZA ARRIBA: " 
1507 PRINT"MMBINTRODUCE OPCION ELEGIDA: " a 
1510 PRINTTABCO> "META O 4 1718 MAA IDO AL ON 


GET R$: IFR$=""THEN1513 

FOKESS+39,6:PRINT"01" : RETURN 

DATA3, 255, 192,12,0,32,16,16.16.32.56,9,32,1083,8 
DATA64, 40,4,64,40,4,64,0,4,93,206,223,91,72,164 
DATAS1.206,228,81,66,164,93,46,148,64,0,4 

DATR64, 40, 4,64,40,4,32,108,8,32,56,8,16:16,16 
DATA12,0,32,3,255,192 
DATA3,255,192,12,0,32,16,32. 16,32, 120,8,32,192,8 
DATAS4, 120,4,64,32,4,64,0,4,93,206,223,81,72,164 
DATAS1,206,222,81,6€, 164,93,46,143,64,0,4,64,16,4 
DATR64, 120,4,32,12,8,22,120.5,16,16,16,12,0,32,3,255, 192 
DATAD,0,0,7,255,224,24,0,24.96,0,6,123,0,1,129,1,123 
DATA134,131,129,132,2,129,132,0,129,142,0,129 
DATA132,0,123,132,8,129,132,0,129,123,0,1,96,0,6 
DATA24,0,24.7,255,224,0,0,0,0,0,0,0,0,0.0,0.9 

Lea FIN DEL MENU PRINCIPAL 

Ls ak PRESENTA MASCARA ok 

REM ; 


FORI=1TODS:=DxC1):Y=DYc1>:GOSUB11000:PRINT"A"DFCI> NEXTI 
FOR J=1 TO NUC 


2 Ag="" 


IF TPCJICOS AND TPCJ><54 THEN 2060 
SCA) =C CJ) :GOSUB1 1000: PRINT"A "¿BéCIA 
GOTO 21308 


y Hi= A ¿N2=ND<J2:1F TPCJ)=1 OR TPOJ)=2 THEN C$=NS$:GOTOZ065 


IF Ni=1 THEN A$=C4+:G0TO 2095 

FOR I=1 TO Hi-N2-1:A$=A$+C04:NEXTI 
IF H2=0 THEN AS$=A$+04$:G0TO 2095 
AS=AS+PDS 

FOR I=1 TO N2: A$= AS+"0" :NEXTI 


"RINT 

Bs ="" 

2 FOR k=1 TO N1-N2-1 

ESCJ)=BS$CJIANSS 

NEXT K 

IF Nzso THEN B$(J>=B$(J)+NS$:GOTO 2130 
BS$(J)=B4(J)+PDS 

co IG DECI) SBECIIINSS: NEXTK 


R 
REM Ok DATA ENTRY dk 
REM 


REM 
J=1 


REN 
NC=J:X=CXUNCA : =CW CNC 
Cc=1 
GOSUB 3240 
IF FS=9 THEN RETURN 
IF F5=0 THEN 3100 
IF FS>4 THEN 3210 
GOTO 3120 
REM CARACTER 
J=J+1:1F J>NUC THEN 3030 
GOTO 3040 
ON FS GOTO 3130,3150,3170,3190 
IF J>1 THEN J=J-1:GOTO 3040 
F3=0: J=NUC:GOTO 3040 
IF J<NUC .. J=J+1:G0TO 3040 
F3=0:GOTO 303 
IF CCXLCCJ> THEN S=1:CC=CC+1:X=X+1:G0SUB 11000:G0TO 23068 
FS=0:G0T0 3100 
IF CC>1 THEN S=-1:CC=CC-1:X=x-1:G0SUB11000:G0TO 3060 
A GOTO 3035 


IF FS>8 THEN FS=6:GOTO 3060 


IF FS=8 THEN FS=0:GOTO 3100 
RETURN 

REM 

REM 4 LECTURA DE 1 CAMPO sk 
REM 

FS=0 

IF TP(NC>=4 THEN RETURN 


IF TP(NC)=2 THEN GOSUB 9000:RETURN 
IF MIDSCESCNC),CC,1)=PDS THENX=X+S:CC=CC+S 
GOSUB 11000 
GET AS:IF A$<>"" THEN 3338 
GOSUB11000:PRINT" de"; :GOSUB11000:PRINT"2A";MIDSCBF(NC),CC,1)5 
FOR T=1 TO 45:NEXTT 
GOTO 3330 
IFASCCAS)=190RASCCAS$)=200RASC(AS>)=1470RASCCA$)=148 THEN 3330 
PRINT"Ma"; AS; 
CA=ASCCAL$) 
FOR I=1 TO 15 
IF TFCII=CA THEN FS=1:I=15: GOSUE3EIO : RETURN 
IF F3=9 THEN RETURN 
NEXTI 
IF TPCONCA<O1 THEN 3450 
ARIAS 0R CA=46 ORCCA>=4S8ANDCAC=57 > THEN3420 
0 
IF mire O 
GOSUB 427 
IF SuP=1 THEN 3410 


2035 


3450 S=1:G0SUB 3520 
3460 IF CC=LCINC> THEN RETURN 
3470 CC=CC+1:X=X%+1:G0T0 3310 


REN 
3521 REM *k TRASFERENCIA AL BUFFER ak 
REN 


3570 IF CC=1 THEN SN$="":GOTO 23599 
3520 SH$=LEFTE(BS$(NC>,CC-1> 

3598 IF CC=LC(NC> THEN DE$="":GOTO3610 
3600 N=LCUNCI—CC: DES$=RIGHTICBSFCNCI ¿NW 
3610 BS(NC>=SN$+AS+DES 

35620 FETURN 

36253 REM 

3630 al 4% COMANDOS ak 


36809 IF FS>S5 THEN 3719 
RETURN 


3/10 IF FS=9 THEN GOSUE 13000: RETURN 
3720 1F FS=3 THEN GOSUB 4080: RETURN 
3725 IF FsS<s THEN RETURN 

3730 ON FS-9 GOSUB 3740,3910 

23735 RETURN 


REM 
3745 REM *«* INSERCION 4% 
3750 REM 
3/70 IF CC=LCCNCITHEN RETURN 
3780 IF CC=1 THEN SN$="":GOTO3900 
3790 SNH$=LEFTSCBS$(NC>,CC-1) 
32D N=LC(NCI=CC+1 : DES=RIGHTSCBGCNCI,N) 
3320 C$=EL$ 
3230 AS=SN$+C$+DES 
23340 ES(NC>=LEFTSCAS,LECNCIO 
3250 ASE: iy e 
3360 CNC) -W=CYENCI:COSUB 11000 
=p 


PRINT BS$C(NC>:S=-1 

IF RIGHTS (BS(NC), 1)=FDS THEN 220 
RETUR 

3 REN 

y RARA BORRADO He 


1F PCNCIOs THEN 3950 
IF MIDSCBLCNCI,2,1=PDF AND CC=1 THEN RETURN 
IF CC<1 THEN RETURN 
IF CC=LC(NC) THEN DES$="":GOTO 3930 
N=LC(NCI=CC : DES$=RIGHTECESFCONCO ¿MN 
3HI=LEFTS(BFCHC>.,CC-1>5 
rm E OR TPNC>=2 THEN CS=H3$:COTO 4418 
¿a + 

BIUNCI=SNIADES+OS 


T 
hLtreY Y=CWONCI + COSUE 11000 

Le 
PRINT ESCNC): S=1 RETURN 
FEEM 4444440 HLIHEADOS 4444444 
IF LCXHCI=1 THEN RETURN 
Hi=LC¿HC:-CC+1 
7 IF CC=1 THEN ESCNC="":GO0TO4100 
20 ES NCI=LEFTECEFCNCO.)CC-1> 
IF TPNC>= 0 a TP(NC)=2 THEN 4150 
6 FOR I=1 TO H 
BSFINC>= PEONCIABLS 
O 
GOTO 4190 
34 FOR I=1 TO Ni 
DL 
D HET 
IF RICHTSCBSINC), 19=PDS THEM SRA EL TIC DOI 
NC A Y=CYAHCO COSUE 1100 
IT ESCNCI ¿RETURN 
g FE 
REN 
REn 
SHP=0 
: IF CC=1 OR CC=LCCONES THEN SHP=1:RETURH 

FOR I=1 TO LC<NC> 

326 IF MIDSCESCNCO, 1,1)=EL$% THEN I=LC<HCA SHP=1 RETURN 
NEXT 1I:RETURN 
REM 


A=LAL 


REM E 
5000 FEM +4 VARIACIONES *+ 
GOSUB 7000 


J COSUE 3007: 1F Fs=7 THEN RETURN 
PRINTHOS: COSUBT7O00 
FOR FE=2 TO Mo 
RE:COSUBE 6500: INPUTH42, ARAS 
ELL =LEFTECAAS., 2): BSC3I=MIDECAAS, 3,2) :ES(99=MIDIFCAAF.5.2) 
ESCOI=MIDIECARE, 7,3) :ESC6)=MIDICARS, 10,4): ES(77=MIDSCARS, 14,2): TPC1)=4 
33 IF O0P2<>2 THEN RETURN 
FOR I=2 TO P:TPCI)=S NEXT 1 
623 COSUE 2000 
%4=12:W=20: GOSUB11060:PRINT"27 ='NUEYO REGISTRO" 
242 COSUE 2000 
IF FS=6 OR FS=9 THEN GOSUB7000:GOTOS027 
IF FS=7 THEN 5100 
AñAs="" 
FOR I=2 TO 7:AA$=AAS+ES( 1): NEXTI 
GOSUB 6200:PRINTR2.AAS 


y) 
5539 


5955 


HEXT_ RE 

COÓSUE 6400: COSUBEEOO : RETURH 

REM 4 IMPRESION Ak 

COSUB700B:GOSUB 2007: 1F F3=7 THEH RETURN 

Ni=YALCLEFTSCBSC3), 29): N2=WALCMIDEC EIC. 3,27) :N3=WAL(MIDIECEF(3), 5,29) 


3 HOS=HF3$ 


COSUEE480 : COSUBECOD 


3 COSUE21200 : COSLUBSEAD 


GOSUB 5999 


3 COSUEEOGO : HF$=H0$ : GOSUECZTOO 


PRINTHOS; :PRINT"=3"; : OPENS, 4 

IF ESC2=" 1" OR B$(2="H" THEN 2$="A":GOTOSS27 
23="p" 

IF SC=2 THEN CiD4:PRINTCHR$(175 


3 PRINTTABCZ EF 15," NACID";Z2$;" EL :"¡H1:5L$;N2;SL4;N3 


IF SC=2 THEN GOSUBSE00:GOTO 5531 
PRINTTABC1);"9FECHA", "ALTURA"," PESO ","-, CRANEO" 
IF SC=2 THEN PRINT44 

FOR RE=2 TO MX 

IF SC<O2 THEN PRINT"A";5 

PA=SRE : GOSUB6300 : INPUT+2, ARAS 

R1=RE-1 

COSUBSO30 

IF SC=2 THEN CMD4 :PRINTCHR$(17>5 


PRINTBS$(23SL$B$(3)SL$B$(4)SPOCSI)BSCSI)P1SCRIISPOCSI)BSCE)P2ZSCRIISPOC7I)BEC7IP3 


IF pena THEN PRINTR4 

HEX 

COSUBC4DO: GOSUBE$0B : CLOSE4 

4=2:=23:60SUB11000:PRINT"MPULSE UNA TECLA PARA YOLYER AL MENU"; 

POKE138,0:WAIT193,1:RETURN 

tic TAM SPOLOI MAL] AM SPECTRA SPC(9)"—, CRANEO"; ¿RETURN 
mM 

PRINT HO$: GOSUB7009 

2=2:W=10:G0SUB11009:PRINT"S5/1 TT MA :" 

a=14:Y=Y+3:G0SUB11000:PRINT"E< ALE EN VIDEO" 

W=Y+2:G05UB11000:PRINT"5 EE EN IMPRESORA" 

4=16:Y=15:G0SUB11000:PRINT"MELIJA ":x=22 

GET SC$: IFSCI<>"" THEN 5959 

COSUB110560:PRINT" ur?" :GOSUB119090:PRINT" " 

GOTO q 

SC=VAL (SCS 

IF SC<1 or. sc>2 PP. 5970 

RETURN 


Ren Ak GESTION DISCO kk 
yl 


REÍ 
E APERTURA CANAL COMANDOS 


5 RETURN 


CLOSE 


R1= PR: R2=0 

IF R1>256 THEN R2=INT(PA/256) : RI=R1-2564R2 
PRINTR1,"P"CHRSC3+96>CHRGCRI)CHRECREICHES 1) 
RETURN 

REM 

REM -- EXTRAE REGISTROS -- 
B$(2)=LEFTSCARS, 2) 

BSC3)=MIDSCARS$, 3,2) 

B$(9=MIDS$CAR$,5,5) 

FOR K=1 TO 5 

IF MID$CBS$(4),K, 1)=CHR$<35) THEN B$(4)=CHR$(327+RIGHTS$CBG(4),5-K) 
NEXT K 

RETURN 


REM 

REM dk CARGA LOS DATA dk 

IF OPZ=9 THEN7006 
L=LENCYO$C0PZ2>-3:L$=RICHTSCYOSCOPZI,L> IF 0PZ=0 THEN 7005 
U$="0Z "+STRICOPZI+" " 
P=C(30-L)/2:P$="":FORK=1TOP:P$=P$+" ":NEXT K 
PRINT"3"; :PRINTCHR$(14> 

PRINT "Mm =r.1... "DICIONES -—ORUNM, +.*." 
PRINT"MATR ";US;" Xx 
PRINT "MZA q PS; 

IF UPZ=0 THEN PRINT" ma"; 

PRINT"EALS; "PS 

PRINT"IBBDDDDIS ys 


109053 


10055 


2038 


POKE 198,0:MA 
gR 


A=1:v=22:G0SUB11000:PRINT"T " 
4=25:'1=23:G0SUB11000:PRINT"A--L+l : el, 

REM 

IF OPZ=0 THEN RETURN 

REM 


ON OPZ GOTO 7044,7044,7044,7044,7042,7042,7110,7046,7044 
Lv=13:GO0SUB_ 20090: NUC=5 : DS=6: GOTO7990 

L'=59: GUSUB20090 : NUC=7 : DS=3:G0OTO7090 
LV=120:GOSUB20098 : NUC=16: DS=10:GOTO7099 

FOR I=1 TO DS:READ D$(1>,DxXc1>,DW(1):NEXTI 

E98 I=1.TO NUC:READ TPCI,LOCI) NDA OACI CCT) 

¿End 

NEXT 1 

RETURN 

REM -- CONTROL FIN DE FICHEROS -- 

IF MA>NRM THEN 7520 

RETURN 

FRINT HOS 

4=2:Y=10:G05UB11900 

PRINT"EL FICHERO DATOS :"¡NF$;"ESTA AGOTADO" 
X=4+1:Y=Y+5:G0SUB11090:PRINT"WWPULSE UNA TECLA PARA NUEVA ELECCION" 
GOSUB 6400:GOSUB 66089 

IT 198,1:RUN 


REM 
G$C19=STRECGUKO) 65 2)=STRSÍMCKO > ¿GC 2I=STRSCPAKO) GC =STRECYAKO) 
FOR J=1 TO 4:L<J3=LENCG$CJ)) NEXT 

FOR M=1 TO 4 

N=3: 1FM>2 THENN=6 


Hi=N-L CM): 1F Ni=0THEN7850 

FOR P=1 TO N1:0$(M>=CHR$(327+6$(M) :NEXTP 
NEXT mM 

RETURN 

REM 

REM” INTRODUCCION DATOS EN FICHERO NOMBRE 
REN 

GOSUB 7099 

HUC=1:DS=1 

GOSUB 2000 

GOSUB 3008 

IF FS=6 OR FS=9 THEN 8005 

IF FS=? THEN RETURN 

NF$=LEFT$(B$(1),3) :GOSUB21100 


GOSUE 6080:GOSUB 6208 
PA=1:GOSUB 6800: INPUTH2, ARS 
GOSUB 21808 
HRM=20: GOSUB 7599 
IF OPZ<>1 THEN RETURN 
PA=MX : GOSUBESD0 : INPUTH2, RAS 
D1=VAL(LEFTSCARS,2)):D2=VAL(MIDSCARS,3,2)):D3=VAL(MIDICARS, 5,2) 
GOSUE 7890: TPC1)=4 
OSUE 2608 
cosus 3688 
IF FS=6 OR _FS=9 THEN 2027 
IF FS=7 THEN GOSUEG400: GOSUBE608: RETURN 
IF VALCB$(2)><=0 OR VALCBS(3))<=8 THEN GOSUB 9150:G0TO 8037 
IF WALCE$(2))31 OR VAL(B$(3))712 THEN GOSUB 9150:G0TO 2037 
BS(4)=RIGHTS(BF(4),2) 
D4=VAL (B$(2)) :DS=VAL (B$(3)) : DE=VAL(BF(4)> 
16 P4c=D1 AND DS>D2 THEN 8880 
IF DS>=D2 AND DE>=D3 THEN 2880 
IF D6>=D3 THEN 8020 
GOSUB 9150:GOTO 3040 
IF D4<10 THEN B$(2)="9"+RIGHTSCBS(2),1) 
AAS=ES(23+BS$(3)+ES(4)+BS(5)+B$(6)+B3(7) 
PA=M1X+1 
GOSUB 6800:PRINTHZ, ARS 
PA=1:GOSUB6200: INPUTRZ, RAS 
GOSUB 21608 
M=t1+1 
BS(4)=STRSCMX) 
IF MX<10 THEN B$c4)="00"+RIGHT$CB$(4),1):G0T0 8125 
IF Mx<100 THEN B$(4)="9"+RIGHTS(B3(4),2):GOTO 8125 
B4(4)=RIGHT$CES(4),3) 
Pñ=1:ARS=ES(1)+B$(2)+ES(3)+ES(4)+BS(5) 


COSUEES00 :PRINTH2, ARS 

GOTO 3025 

REM RUTINA ERROR 

4=3:Y=20: GOSUB11000:PRINT"AN LT TALA" 

FOR T=1 TO 1500:NEXT T h 
> 4=9:=20:G0SUB11000:PRINT" "RETURN 

REM ARA DATA AAA 

REN 

DATA 145,17,29.157,140,133,126,13,25,134,135,0,0.0.0 
NM 

DATA" ANOMBRE",7,9, "RSEXO", 7.11, "ASA 7AF: ,7,14 
> DATA" ADIA",7,16."MMES",17,16."3ANO",27,16 

DATA3.6.0,13,9 

DATA3.1,0.13.11 

DATA1,2,0,14,16 

DATA1.2,0,23, 16 

DATA1.4,4,32,16 

REM ARA OP Z=1 ARA AAA 

DATA" HOMBRE",7,7, "MDIA",7,10,"3ES".17,10."3AN0",27,10 
3 DATA" SALTURA"., 7.13, "3PESO".7,15, "AC. CRÁNEO", 7,17. "(CM ".25,13, "(26)" 

DATAS3.6,0,18,7 

DATA1.2,6, 14,10 

DATA1,2,6.273.,10 


25 
a) 


1 


= 
ps] 


10057 DATA1,4,6,32,10 
10053 DATA1,3,0,19,12 

10059 DATA1,4,1.19,15 

10069 DATA1,2,0,19,17 

10070 REM ARRARAR OOPZS ARRRRRA RARA 

10071 DATA" HOMBRE",5,6,"2HACIMIENTO",5,8."2",18,3+"4",21,8,"BALTURA". 5.10 
10072 DATA"WPES0",5,12,"9CIRC.",5,14,"4ULTIMA MEDIDA EL",5.16."7",27,16 
169073 DATA"/",20,16 

10074 DATA4,6,0,12.6,4,2.0,16,8,4,2,0,19,2,4,2,9,22,8 

19075 DATA4,3,0,16,10.4,4.0,16,12.4,2.0,16,14 

10076 DATA4,2,0,25,1€,4,2,0,22,16,4,2,0,21,16 

1OLO0 REM RAMA AI RROIAIIIIICIAR: 

11009 REM 

11001 FEM_44k POSICIONADO EN. Y AAA 

11005 POKE 211.% 

11010 FOKE 214,Y 

11015 SYS528732 

11020 FETUEN 

12000 REM 44 GENERACION SISTEMA 4% 

12005 OPZ=5:GOSUB 7008 

12010 COSUB 26009 

12015 COSUE 2008 

12016 IF FS=6 OR FS=9 THEN 12005 

12017 1F FS=7 THEN RETURN 

12012 K2=0 

12020 FOR K=1 TO LC<1> 

12022 IF MID$CESC1>,K,1)=CHR$(232) OR MID$CES$C1),K, 1)=CHR$(25) THEN K2=K2+1 
12023 NEXTK 

12024 IF K2=LCC(1> THEN GOSUB 9150:G0TO12610 

12025 1F ESC(25=""" DR B3(2)="x" THEH 12030 

12027 1F E$(2)="H" OR B$(2)=" 1" THEN 12030 

12028 GOSUE 9150: G0T012010 

12030 IF VALCES$(3))331 OR YALCES$C3))<0 THEN GOSUE9150:G0T012010 
12032 IF YAL(PS$(49012 OR VALCES(4))<0 THEN GOSUE9150:GOTO12010 
12035 ARAS=ES$C1>+B4(27+B$(23+B8(4)+RIGHTECESCD), 274" 1U+ "RARO 
12040 NFS$=LEFT$(B$(1>,2) 

12042 COSUE 6068 

12045 OPEN2,2,3, "0: "+NFS+",L,"+CHR$(21) 

12050 PA=1:GOSUB 6800 

12052 PRINTH2.ARS 

12060 PRINTHOS:OPZ=9: GOSUB7000 

12067 %=2:=21 :GOSUB1 1000 :FRINT" A ST= Cr LO NOAA TA 
12068 FOR I=1 TO 4:TPC1>=4:NEXTI 

120569 B$(2=E$(3):ES(3)=B4(4):E$(4)=RIGHTSCES(5),2) 

12070 GOSUB 2608. 

12072 GOSUE 2009 

12078 IF VALCB$(2))<10 THEN B$(2)="09"+RIGHT$(BFC2>,1) 

12090 ARF=ESC2)+ES(3)+BF (4 )+BF (SABES CSI AEGCT IA RRA 

12100 PA=2:COSUB 6300 

12105 PRINTHZ,AAS 

12110 PA=1 :GOSUBE300: INPUT42, ARAS 

12115 GOSUB 21000 

12120 ARS=ESC1)+BSC2+BS(2)+"  2+B$(5) 

12125 PA=1:GOSUEG200 :PRINTAZ, ARS 

12130 GOSUB 6608:GOSUB 6400 

12200 PRINTHOS 

12205 REM 

12210 %=7:Y=10:COSUE11000:PRINT"S0TRA PERSONA (S/M)":%X=26 

12215 CET Ls. IF R$="" THEN GOSUB11080:PRINT"=7?":GOSUB11990:PRINT" ":G0TO12215 
12217 PRINTR$ 

12220 IF R$="N" THEN RETURN 

12225 IF R$<2"S" THEN 12215 

12230 PRINTHOS:GOTO 12095 

12999 REM ARAAAA AA olacicioioR 

13000 REM Ak AYUDA Akok 


13005 REM 

13010 POKE ORO EI TEE 

13015 PRINTTAECS)"MACESR RIGHT : 5 MUEVE A DERECHA " 
13020 PRINTTABCS)"MACRSR LEFT  : A MUEVE A IZQUIERDA" 
13022 PRINTTAE(S)"MACRSR UP ¿24 MUEVE ARRIBA 

13025 PRINTTABCS>"MAMCRSR DOWN: E MUEVE ABAJO s 
13030 PRINTTRAE(S)"MA F1” : 5 ANULACION a 
13035 PRINTTABCS> "MA F3" : E INSERCION » 
13040 PRINTTABCS)" MA FS”  * : 51 BORRADO E 
13045 PRINTTABCSO> "MA FF?” + EH RETORNO AL. MENU " 
13047 PRINTTABCS) "MA FS” ¿ 543 INTRODUCCION E 
13050 PRINTTAB(S)"MACTRL+V : E AYUDA a 
13055 REM 

13060 PRINTTABCS)"MARETURN : 2 ALINEAR AS 


13063 A yl TECLA PARA CONTINUAR" 

13066 GETR$: IFR$=""THEN130: 

13062 PRINT HOS: PRINICHRSC19): POKE 353220,14 

13070 RETURN 

140009 REM -- IMPRESORA -- 

14001 REM lok 

14002 REM 

14005 CMD4 

14020 PRINTTRE(S>G$C1>;"/",C$(2);TABC157G$(3);TABC27 70514) 
14030 RETURN 

1€000 REM Ak LISTA PERSONAS xk 

16005 GOSUE 7008 

16007 NUC=1:DS=1 

16010 GOSUB2000 

16015 COSUE 3000 

16020 IF FS=6 OR FS=9 THEN 160109 

16025 IF FS=7? THEN RETURN 

16030 X=DX(1>:Y=PY<1):G0SUB11000:PRINT" a 
16040 NFS$=LEFT+(B$(1>,3) 

16045 GOSUB 21100 


2039 


COSUB 6089 


2 GOSUB 6200 


PA=1:GOSUB 6200: INPUTR2, ARS 


5 GOSUB 21009 


C$=B$(3) 
ES(2)=LEFT$CCS, 2) :ESC3I=MIDG(CS, 3,2): B$19)=RIGHT$CCS, 2) 
PA=2:COSUB 6200: INPUT+2. ARS 

ESCSI)=MIDSCARS. 7,3) :ES(6)=MIDS$CARS$, 10,47: B$(77=MIDFCARS, 19,2) 
PA=11xX:GOSUB 6800: INPUTH2, RAS 

GOSUB £6009: GUSUBE400 
BS$3)=LEFTSCARS, 2): B$C9)=MIDSCARS, 3,2): B$C10)=MIDSCAAS. 5,2) 
DP2=2:C0SUB7040 

COSUB 2008 


2 2=3:Y=19:G05UB11000:PRINT"2PULSE UNA TECLA PARA YOLYER AL MENU" 


GCETAS: IF A$="" THEN 16092 

RETURN 

REM dk CALCULO MESES ak 
CO=YALCLEFTSCARS. 275 :MO=YAL(MIDECARS, 3.27): AB=WAL(MIDECARS. 5.272 
AP=AD-AR : MP=M0-HMM1: GP=G0-GG 

IF GP<1S THEN P=0 

IF GP215 THEN P=1 

MORE )=124AP+MP+P 

RETURN 


0 REM RESTORE DATA 


RESTORE 
FOR 1=0 TO €2:READ D:NEXTI 
FOR I=1 TO NW:READ X$:MEXTI 


5 TO 
20039, FOR I=0 TO 62:READ D:NEXTI 
2 XT K 


IF Lv<8 THEN RETURN 


B FOR I=1 TO LW:READ LY$:NEXTI 
g RETURN 


REM EXTRAE PUNTERO REGISTROS 
B$(1)=LEFTSCAR$,6):BSC2=MIDSCARS, 7.1) :BSC3)=MIDECARS, 3,6) 
B$(4)=MID$(AR$, 14,3) :BS(5)=RIGHTSCARS: 4) 

MX=VALCBL(4)) 


> RETURN 


REM CONTROL EXISTENCIA FICHERO 
COSUB 60608 
COSUB 6200 


S INPUTR1,A,BS,C,D 


COSUB 6400:GOSUB 6609 

IF AX562 THEN RETURN 

PRINTHO$:X=8:=10:G0SUB11009 

PRINT"FICHERO RA" NFS; "EA NO HALLADO" 
X=2:Y=W+5:COSUB11000:PRINT"NPULSE UNA TECLA PARA VOLVER AL MENU" 
PE an 193, 1:RUN1S 


GOSUESOGO : GOSUBE209 

FOR RE=2 TO Mx 

PARE : GOSUBS300 : INPUTH2Z, ARS 
CO=VALCLEFTSCARS, 27) :MO=VALCMIDICARS, 3,2): AB=VALCMIDECAAS, 5,23) 
AP=AD-N3 : MP=M0-N2 : GP=G0-N1 
IF GP<15 THEN P=0 

IF GP>15 THEN P=1 
MECRE=1)=12KAP+MP+P 
HCRE-1)=VAL(MIDECARS, 7,3) 
PCRE-1)=VALCMIDSCARS. 10,4)) 
CCRE-1)=WALC(MIDECARS.: 14,2)> 
NEXT RE 

COSUBSE00 : GCOSUES400 

IF B$(2)="H" OR B$(2)=" 1" THEN NF$="TABH":G0TO021230 
NF$="TAEY" 
GOSUBE000 : GOSUBE200 

FOR I=1 TO 12 

PA=1 : GOSUB6800: INPUT42,AAS 
MT<I>=YALCLEFTSCARAS, 2) 

HTC 1, I9=VALCMIDSCARS,3,3)> 
HT<2, 1)=YALCMIDEC<AAS.6,3)) 
PTC1, I)=VALCMIDSCARS,9.4)> 
PT<2, 1)=VALCMIDSCARAS, 13,4) 
CTC1, 1)=WALCMIDSCARAS, 17,2) 
CTC2, 1)=WALC(MIDECARAS, 19. 2)> 
NEXT 1 

GOSUB6E08 : COSUBE4DOG 

FOR b=1 TO MX 

FOR HW=1 TO 12 

IF MECHI<=MTCULO THEN 21268 
Pis$(W)=".":Peécuo=",":P3gCH)=".":GOTO 21310 
REM CALCULO MEDIA 

MH=CHT 1 RH TZ M7 2 
WP=CPTC1MMIRPT OZ 2 
VORCCTC1 NIRO Zo 2 
Hbl=12 


IF HCD O WH+CYHA. 05) THEN P1$cH :COTO21220 
JE HO SVECVHA.05) THEN P1SCU)="=":GOTO21280 
APLECID="2" 
IF PLDOVP+CVPR. OS) THEN PZ$C1D)="+":COTO21290 
IF PON)<YP-CWPR.052 THEN P2$(W)="-":GOTO21290 
Pesan=io 
O IF CCOVCÍCVCA. OS) THEN P2$cM)="+":COTOZ1310 
IF CUDEVO=CWCA.05) THEN P3$cuo="-":GOTOZ1310 
Parcu= 
REM 
NET HH 
NEXT 
5 RETURN 


Archivo símbolos gráficos 


10 REM 
15 REM CREA ARCHIVO SIMEOLOS GRAFICOS 
20 REM 


23 OPEN1,8,15 

30 OPEN2.,8,3."0:SIMB,L, "+CHR$(16) 

35 FOR J=1 TO 59 

37 S$="" 

39 FOR I=1 TOS 

49 READ S 

45 S1$=5TR$CS) 

47 1F S=0 THEN S1$="000":G0TOS1 

43 IF S<10 THEN S1$="00"+RICHT$CS1$, 1):G0TO051 
50 IF S<100 THEN Si$="0"+RIGHT$(S1$,2) 

51 S$=9$+51$ 

52 NEXT 1 

54 Ri=J:R2=0 

55 IF R1>256 THEN R2=INTCJ/256) :R1=R1-256kKR2 
60 PRINTH1, "P"CHR$(3+96>CHR$CRI)CHRSCRZICHR$C1> 
65 PRINTH2,S$ 


70 NEXT J 
75 CLOSE1:CLOSEZ 
80 END 


100 DATAG,.0,0,0,0,4,4,4,0,4,10,10,0,0,0 

102 DATA10,31,10,31,16,31,208,31,5,31,17,2,4,8,17 

104 DATAG,0,0,0,0,4,4,0,0,0,2,4,4,4,2 

106 DATAS,4,4,4,8,21,14,31,14,21,4,4,31.4,4 

108 DATAG.6,0,2.4,0,0,31.0,0,0,9,0,0,4 

110 DATA1,2,4,8,16,14,10,10,10,14,6,2,2,2,2 

112 DATA14,2.14,8,14,14,2,14,2,14,10,10,14,2,2 

114 DATA14,5,14,2,14.14,8,14,10,14,14,2,2,2,2 

116 DATRA14,10,14,10,14,14,10,14,2,14,0,0,4,0,4 

118 DATRO,4,0,4,58,2,4,5,4,2,0,31,0,31,0 

120 DATAS,4,2,4,8,21.1,31,0,16,0,0,0,0,0 

122 DATA14,17,31,17,17,30,17,30,17,30,15,16,16,16,15 
124 DATA30.17,17,17,30,31,16,30,16,31,31,16,30.16,16 
126 DATA1S.,16,19,17,15,17,17,31,17,17,4,4,4,4,4 

123 DATA2.2.2.18,12,17,18,28,18,17,16,16,16,16,31 
130 DATR17,27,21.17,17,17,25,21.19,17,14,17,17,17,14 
132 DATA31.,17,31,16,16,14,17,21,19,15,31,17,31,18,17 
134 DATA31.16,31,1.31,31,.4,4,4,4,17,17,17,17,31 

136 DATA17,17,17,10,4,17,17,21,27,17,17,10.4,10,17 
138 DATA17,10,4,4,4,31,2,4,8,31 
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P Menú principal. También en la versión Apple, a los 
diferentes temas corresponden otras tantas voces del 
menú principal. 

La activación de una de estas voces genera la carga y 
el lanzamiento de un programa que, a su vez, contiene 
su propio menú principal. Obsérvese que falta la voz 6 
(en el C-64 sirve para generar el fichero que deberá 
contener los caracteres en alta resolución), puesto que 
la gestión de la página gráfica, y por tanto de los 
caracteres en alta resolución, es interna a los 
programas y no requiere ficheros de apoyo. 


Introducción de los datos. La máscara muestra la 
estructura utilizada por la Data Base médica. El campo 
código representa el número de registros en que están 
memorizados los datos presentados, y puede utilizarse 
como puntero para su búsqueda. 


Calendario vacunaciones. El valor del código, 
utilizado como puntero a los datos, se presenta en 
todas las fases de actualización. La foto de al lado 
muestra la máscara vídeo que aparece al pedir la 
modificación del dato número 2. 

El contenido del fichero, en el registro 2, se lee o se 
presenta en pantalla, y al mismo tiempo se activa el 
procedimiento de variación que permite modificar el 
contenido memorizándolo en lugar de los valores 
anteriores. 


Factor de crecimiento. El control del factor de 
crecimiento también se realiza con programas 
completamente diferentes a los de las otras versiones 
debido a la gestión particular de los gráficos, aunque 
conservan la misma lógica y funcionalidad. La foto 
muestra la estructura de la máscara vídeo utilizada para 
la introducción de las medidas, y es evidente que no 
existen diferencias sustanciales con las otras. 
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RELACION PRINCIPALES VARIABLES - COMMODORE 64 


Calendario vacunaciones 


AAS$ =buffer de comunicación con disco 

AG =si es igual a 1 indica que se está 
en una actualización 

GG =día de las fechas 

INS =0peración en curso (introducción, 
actualización, etc.) 

LM =máscara presentada 

LR =longitud del registro 

MA =número voces menú + 1 

MM =mes de las fechas 

MPS$ =nombre programa 

MX =número de registros del fichero 

NC =número del campo actual 

NFS =nombre del fichero 

NR =número de registros 

| =si es igual a 1 indica habilitación 
de la impresora 

sT =impresión habilitada 

TIS =para la presentación de mensajes 
en centro pantalla 

v$ =nombre de la vacuna 

V(«) =número registros en que ha sido 
positiva una búsqueda 


Data Base médica 


C1$ =apunta a un carácter del interior 
de A$ para la comparación 

=apunta a un carácter del interior 
de C$ para la comparación 

=cCopia del registro del fichero 

=días de distancia entre dos fechas 

=unidad seleccionada 

=código de tecla función pulsada 

=día de las fechas 

=apunta al registro 

=utilizada para la búsqueda del fi- 
chero 

=utilizada para la búsqueda del fi- 
chero 

=mes de las fechas 

=nombre del programa 

=apunta hacia el último registro del 
fichero 

=nombre del programa 

=número de registros 

=apunta al registro 

=si es igual a 1 indica habilitación 
de la impresora 

=para la presentación de mensajes 
en centro pantalla 


1S%(») 


JS%(«) 


Factor de crecimiento 


=contiene las c. cráneo medidas 

=circunferencia cráneo media 

=límite mín. y máx. de la circunfe- 
rencia cráneo 

=unidad seleccionada 

=código de tecla función pulsada 

=día de la fecha última medida 

=día de la fecha 

=alturas medidas 

=mín. y máx. de las alturas 

=0peración en curso (introducción, 
actualización, etc.) 

=mes de la fecha 

=nombre programa 

=apunta al último registro 

=nombre del fichero 

=número de registros 

=pesos medidos 


Tablas comparativas 


AS$ =carácter que identifica los campos 
de introducción alfanuméricos 

NS$ =carácter que identifica los campos 
de introducción numéricos 


Gráficos 


=Uusada para la construcción de los 
caracteres en pantalla. 

=Uusada para la construcción de los 
caracteres en pantalla 

=contiene las c. cráneo medidas 

=cCircunferencias cráneo medidas 

=para construcción de caracteres 

=unidad seleccionada 

=Uusada para la construcción de los 
caracteres 

=para construcción de caracteres 

=usada para la construcción de los 
Caracteres 

=alturas medidas 

=mín. y máx. altura 

=apunta al último registro del fiche- 
ro 

=nombre del fichero 

=número de registros 

=mín. y máx. pesos 

=Uusada para la construcción de los 
caracteres 
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Menú principal. La foto muestra la máscara del menú 
principal para la versión MSX. También en este caso 
valen las mismas observaciones, puesto que se trata de 
un módulo cargador cuya misión sólo es la de activar un 
determinado número de programas, cada uno con su 
propio menú principal. 


Data Base médica. Del correspondiente menú (ver foto 
2 del C-64) puede seleccionarse la función deseada. 
Para las introducciones y las actualizaciones se 
presenta una máscara análoga a la indicada en la foto 
de al lado. Naturalmente, para la introducción, todos los 
campos (menos el del código que es el puntero al 
registro) están en blanco. Obsérvese la diferente 
simbología entre los campos de contenido alfa- 
numérico (—) y numérico (=). 


Máscara de selección. La foto muestra la data entry 
para la implantación de los parámetros de selección. Es 
análoga a la foto correspondiente de la versión C-64. 
Las únicas diferencias que hay sólo son formales, y 
residen en la estructura de la máscara. Por ejemplo, en 
esta versión se presentan, como recordatorio, los 
posibles operadores lógicos (que tienen significado 
para el campo numérico). 


Calendario de vacunaciones. Seleccionando la voz 1 
del menú principal, se tiene la activación del módulo 
previo a la gestión del calendario de vacunaciones. 
Como ya se ha indicado, se realiza con un programa 
existente y, por tanto, prevé su propio menú principal. 
Para la inicialización de la cinta datos se requiere la 
activación de la voz 4 (Generación del sistema). 
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LA 


Gestión calendarios. La foto muestra la fase de 
implantación en la Gestión calendarios. Con los datos 
así introducidos, el programa selecciona el registro 
correspondiente a la vacuna “antisarampión” de 
nombre Juana. Los datos correspondientes, si existen, 
se presentarán en pantalla, preparados para 
eventuales actualizaciones. 


Factor de crecimiento. La foto muestra el menú 
principal del programa para el control del factor de 
crecimiento. Como también se trata de un programa en 
sí mismo, su activación requiere, en este orden: 

— Generación del sistema (voz 5) 

— Introducción o variación de las tablas (voz 6) 

— Creación lista de personas (voz 4) 

Sólo al final de estas fases, el sistema está preparado 
para su utilización. 


Generación del sistema. Activando la voz 5 del menú 
principal, se envía a ejecución la subrutina Generación 
del sistema. La máscara pide la introducción de los 
datos personales (nombre, sexo, fecha de nacimiento) 
que ocuparán el primero de los dos registros del fichero 
datos correspondiente a la persona especificada. 


Presentación de los gráficos. Como se ha indicado, 
los datos obtenidos con las medidas previstas en el 
control del factor de crecimiento se memorizan en el 
fichero correspondiente al niño y constituyen una tabla 
que muestra las evoluciones de los diversos 
parámetros. 

El mejor método para poner de manifiesto una 
evolución es la presentación gráfica. Por tanto, en el 
programa hay incluida una subrutina que presenta en 
pantalla el gráfico de los valores medidos, con respecto 
ala gama identificada de valores normales. 

La zona de color es el campo de normalidad (obtenida 
de las tablas), y los puntos en su interior son las 
medidas del niño. 

Naturalmente, existe un gráfico diferente para cada una 
de las magnitudes controladas; el mostrado 
corresponde al peso. 
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RELACION PRINCIPALES VARIABLES - PHILIPS VG 8010 


Calendario vacunaciones 
AAS(x) 


DHS$(x) 
CS$(«) 


ist) ) 


=records file 

=fechas cumplidas - no cumplidas 

=usada como apoyo en la impre- 
sión de los datos 


=Uusadas en la búsqueda 


Data Base médica 


AAS(+) 
BB$(+) 
JS(x) ) 
IS(«) 
DHS(+) 
CO$ 


=registros fichero vocabulario 
=registros fin de fichero 


=Uusadas en la búsqueda 


=fechas cumplidas - no cumplidas 
=cCcadena de comparación 


Factor de crecimiento 


=se memorizan las fechas de la in- 
troducción anterior 
=registros fichero "RAG” 
=registros fichero “TABM” 
=records file “TABF” 
=usada como apoyo en actualiza- 
ción tablas 
=cálculo meses de cada introduc- 
ción 
H(+) =memoriza valor de la circ. cráneo 
de cada movimiento 
P(x) =memoriza valor del peso en cada 
movimiento 
C(+) =memoriza valor de la circ. cráneo 
en cada movimiento 
=memoriza meses de las tablas 
=valores máx. y mín. de altura 


C$(+) 


AAS(+) 
BB$(+) 
CCs$(+) 
DDS(+) 


ME(+) 


MT(x) 
HT(«) 


Extensiones y modificaciones 


En esta aplicación, todos los procedimientos de 
búsqueda están estructurados sin tener en cuen- 
ta eventuales problemas de tiempo. En realidad, 
esta lógica sólo puede ser aceptable inicialmen- 
te, cuando los archivos no contienen una elevada 
cantidad de datos. 

Con el paso del tiempo, si el programa se utiliza 
con frecuencia, puede haber ficheros excesiva- 
mente largos para ser tratados de la manera vis- 
ta. En general, la solución más obvia consiste en 
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=valores máx. y mín. de peso 


PT(+,*) 


=valores máx. y mín. de la circ. crá- 
neo 

=tipo de tabla: Varón-Hembra 

=fecha actual 

=fecha anterior 

=fecha del siguiente movimiento 


CT(+,x) 


=memoriza el signo (- + /) del valor 
de: altura, peso, c. cráneo, a utili- 
zar en impresión 


P35$(+) 


Gráficos 


AAS(x) =registros del fichero reservado a 
persona 

=registros tablas varones 

=registros tablas hembras 

=usada como apoyo. En DD (Vo H) 
se memorizan los datos de la 
tabla varones o hembras según el 
sexo de la persona 

=contiene la opción elegida (altura, 
peso, c. cráneo) 

=memoriza los meses en que se 
han introducido datos 

=valores máx. y mín. de la opción 
elegida (altura, peso, c. cráneo) 

MT(x) =valor de meses en las tablas 

MTS(x) =fechas de las tablas; p. e. NA-03-06 

H(x) =valor efectivo de las medidas de 
la persona 

=letras del alfabeto redibujadas 

=valor asumido por X e Y para el di- 
bujo de gráficos 

P(x) =contiene el máximo de los máxi- 

mos y mínimos de altura, peso, C. 
cráneo. 


BBS$(+) 
CC$(+) 
DD$(+) 


NOS(+) 
MES(+) 


HT (x,x) 


S15$(x) 
A(x,x) 


mantenerlos ordenados según el campo clave, 
con lo que pueden utilizarse subrutinas de bús- 
queda muy rápidas. En este caso específico de- 
be tenerse en cuenta que muchos datos corres- 
pondientes a situaciones anteriores pierden signi- 
ficado y, por tanto, utilidad. En consecuencia, es 
conveniente borrarlos. 

Finalmente, obsérvese que en lugar de borrar 
realmente los datos, es conveniente utilizar un 
nuevo soporte y archivar el anterior. De esta ma- 
nera, los datos más antiguos están disponibles en 
cualquier momento. 


eo a s ... 
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INTRODUCCION 


Estos programas sirven para ayudar a los chicos 
y chicas en algunas disciplinas escolares. 

Los primeros temas tratados son la Ortografía, la 
Aritmética y la Geografía, de los que se presentan 
algunos ejemplos orientados al grado elemental. 
El software es de tipo «abierto», por lo que puede 
adaptarse a cualquier nivel. Se han previsto otros 
dos programas: Test y el Ordenador para el orde- 
nador, en los cuales puede disponerse de un gra- 
do de dificultad muy elevado. 

Al utilizar los programas de este grupo debe se- 
guirse la misma lógica que en los anteriores. Ini- 
cialmente, para activar el sistema, deben introdu- 
cirse las preguntas que se presentarán al niño y 
las correspondientes respuestas. 

El programa Aritmética es una excepción a esta 
lógica porque, debido a su complejidad, se sumi- 
nistra completo con los datos y, por tanto, ya con- 
figurado. 

Estos programas realizan dos funciones: 


"m Proponer las preguntas y comprobar las res- 
puestas 

= Guiar al usuario en el aprendizaje de la lógica 
de base de la disciplina examinada. 


El primer punto se resuelve utilizando una Data 
Base, más o menos compleja, y el segundo no 
puede generalizarse porque está relacionado 
muy estrechamente con la materia tratada. 

Los programas que siguen están divididos en 
dos grupos: 


1 / Gestión de los cuestionarios, por ejemplo en- 
señanza de la ortografía 

2 / Exposición de una lógica, por ejemplo aritmé- 
tica. 


Abajo se ha representado el esquema lógico de 
principio de este tipo de programas. El flujo está 
dividido en dos «zonas» de competencia diferen- 
te. La primera es la generación del archivo, y con- 
siste en la preparación de las preguntas y de las 
respuestas asociadas; la segunda propone las 
preguntas, analiza las respuestas y proporciona 
el resultado. 

El procedimiento de utilización prevé inicialmente 
la introducción del identificador de quién emplea 
el programa. Este nombre se busca en el fichero 
usuarios, en el que además hay memorizado el 
número de la última pregunta superada. Por tan- 


ESQUEMA GENERAL DE LOS PROGRAMAS DIDACTICOS 


y y 


y 


El programa toma el 
puntero en la última lección 
superada 


Se actualiza el puntero 
del fichero Usuarios 
(pregunta superada) 
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Generación 

archivo. Se introducen las 
preguntas y una serie de 
respuestas, indicando la 
correcta 


«Según el puntero se toman las preguntas 
y la serie | respuestas 


En caso de 
error, la 
pregunta 
vuelve 

a proponerse 


to, el sistema sabe qué pregunta debe ser la si- 
guiente entre todas las que hay en el archivo. 
La estructura del gráfico de la página 2088, en ge- 
neral, es común a los dos tipos de programas; la 
diferenciación se produce en el interior de los blo- 
ques Coloquio y Error. 

En el primer tipo, cuestionario, se propone una 
pregunta y se espera la respuesta. Después de la 
introducción sigue el diagnóstico y la eventual 
nueva presentación de la pregunta si la respuesta 
es errónea. 

En el segundo tipo, esta fase de preguntas y res- 
puestas se presenta a continuación de la exposi- 
ción de la lógica a seguir. Por ejemplo, en la en- 
señanza de la aritmética, antes de proponer el 
desarrollo de una operación, hay que ilustrar su 
metodología, por lo que en este segundo tipo de 
programas es necesaria una estructura más com- 
pleja que prevea la creación y la gestión de un 
fichero de «explicaciones». 

El procedimiento para el uso de los programas 
didácticos debe realizar dos funciones principa- 
les: selección del nombre del usuario, para recla- 


mar la última lección superada, y presentación de * 


las preguntas con comprobación de las respues- 
tas. La primera función puede obtenerse con un 
sencillo INPUT (y así se ha indicado en el diagra- 
ma), seguido de la comprobación de la existencia 
del fichero (por error de introducción o elección 
equivocada del soporte magnético, el nombre in- 
troducido podría no estar entre los previstos). 
En caso de error, o sea de ausencia del fichero, 
en el vídeo aparece un mensaje, y el programa 
vuelve a pedir el nombre del usuario. En esta par- 
te del diagrama se indica una subrutina «sonido», 
generalmente utilizada al producirse un error. Es- 
ta rutina sólo se facilita a título indicativo, puesto 
que en los listados se ha sustituido por el sencillo 
«beep» o no está. Estas diferencias se deben a la 
necesidad de proporcionar listados generaliza- 
dos, cosa imposible con el generador de sonido, 
que es un sistema muy variable en función de la 
máquina utilizada. Sin embargo, el usuario puede 
introducir su propia rutina de sonido incluyendo 
su llamada antes del diagnóstico. Finalmente, ob- 
sérvese que la elección del nombre del niño sólo 
es para las versiones en disco, mientras que para 
la de cinta debe utilizarse un soporte diferente pa- 
ra cada usuario y resulta inútil buscar el nombre, 
a no ser para comprobar que se ha elegido el 
soporte correcto. 

Después de la introducción del nombre del usua- 
rio y la consiguiente comprobación, en el disco se 
lee el texto de la primera pregunta aún no supera- 
da. El sistema tiene en cuenta, en el directorio, el 
número de la última pregunta superada y, por 
tanto, puede empezar una sesión presentanto au- 
tomáticamente la siguiente. 


La pregunta cargada de la manera indicada se 
presenta en la pantalla, y el ordenador queda a la 
espera de las respuestas. 

A medida que el usuario las inttoduce se com- 
prueban y, si son correctas, la lección se consi- 
dera superada. 

El sistema actualiza el fichero y, después del 
acuerdo, pasa a la siguiente. 

Resumiendo, las funciones que deben incluir los 
programas de carácter didáctico son: 


" Preparación de los cuestionarios 

" Gestión de las respuestas 

" Generación de los procedimientos ilustrativos 
de la disciplina. 


Preparación de los cuestionarios. La mayor difi- 
cultad para obtener un buen rendimiento de un 
niño es la captación de su atención proponiendo 
temas de estudio en forma de juego. Para esto, el 
ordenador resulta de gran utilidad porque, a dife- 
rencia de un libro, permite la interactividad, invo- 
lucrando más profundamente al estudiante. En la 
preparación de los cuestionarios deben utilizarse 
las capacidades gráficas y sonoras de la máqui- 
na para crear procedimientos y no una simple se- 
rie de preguntas; para ello se han previsto tres 
módulos principales: 


m Gráficos 
m Sonido 
m Texto 


El módulo de los gráficos tiene la finalidad de per- 
mitir la construcción de sencillos dibujos que ilus- 
tran el tema del texto; el de sonido sirve para ha- 
cer más ameno el programa, mientras que la par- 
te del texto, la verdadera finalidad del procedi- 
miento, comprende la presentación de las pre- 
guntas, la introducción de las respuestas y su 
análisis. 


Gestión de las respuestas. En algunos casos 
sencillos basta con indicar cuándo es correcta la 
respuesta o cuándo es errónea, mientras que en 
otros, además de indicar el error, es necesario 
indicar por qué no es correcta la respuesta y, 
eventualmente, los métodos a utilizar para obte- 
ner la adecuada. 


Ilustración del método. Es el procedimiento más 
complejo de toda la aplicación, puesto que re- 
quiere conocimientos del tema específico. A con- 
tinuación se presenta el procedimiento para el 
aprendizaje de algunas partes de la ortografía. 
Utilizando los módulos ilustrados, es posible am- 
pliar el uso a otras disciplinas. Sin embargo, esto 
requiere el dominio completo del tema. 
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ESQUEMA DE PRINCIPIO DEL MODULO DIDACTICO: 
PROCEDIMIENTO DE USO 


y 


La rutina Sonido debe ser 
parametrizada para producir 
sonidos diferentes en las 
diversas situaciones. Los 
parámetros deben implantarse 
antes de la llamada 


y 


> > 


En este programa, 

el mensaje de error 

se obtiene con un sonido y 
la inversión de la leyenda 


O——=3 ys 


y 


El detalle de esta función 
es más complejo que lo 
indicado. Véanse el texto y 
los diagramas de detalle 


Para el detalle del 
desarrollo de esta función, 
véanse el texto y los 
diagramas de detalle 


Incrementa en 1 el número 
de la última pregunta superada 


Actualiza 
fichero Usuarios 


El programa siempre emplea los mismos 
nombres de los ficheros. Por tanto, 

para utilizar distintos temas, para 

cada uno hay que memorizar los 

datos en diskettes diferentes 


2090 


Ortografía 


El aprendizaje de la ortografía correcta, en parti- 
cular para las lenguas extranjeras, requiere una 
notable atención y frecuentes comprobaciones 
con ejercicios guiados y controlados. 

El procedimiento de Ortografía realiza esta tarea 
ofreciendo diferentes posibilidades, desde la pe- 
tición de proporcionar la correcta asociación en- 
tre vocablos de dos idiomas diferentes, hasta la 
indicación de los nombres de objetos que apare- 
cen dibujados en la pantalla. 

El contenido y la dificultad de los textos los define 
el usuario, que así puede adaptar el programa a 
las necesidades específicas, haciéndolo utiliza- 
ble e interesante tanto a los niños que empiezan 
el aprendizaje de la ortografía, como a los jóve- 
nes que desean «repasar» los vocablos de un 
idioma extranjero. Efectivamente, estructurado 
adecuadamente el ciclo de las «lecciones», pue- 
de obtenerse un desarrollo de dificultad creciente 


Uso del programa 


El tema se desarrolla con dos métodos diferentes. 
En el primero se presentan algunas palabras: el 
niño debe indicar cuáles son las correctas y cuá- 
les las erróneas o cuáles, entre las presentadas, 
pueden asociarse entre sí. El segundo (con gráfi- 
cos) presenta una figura y una serie de vocablos, 
pidiendo cuál de ellos se refiere a la figura mos- 
trada. Pueden utilizarse para aprender el castella- 
no o vocablos extranjeros. 

Un grupo de preguntas identifica una lección, y 
vuelve a proponerse hasta que las respuestas 
son correctas. Es decir, el sistema tiene en cuen- 
ta las lecciones superadas por cada niño, memo- 
rizando la última con resultado positivo. De esta 
manera, los mismos datos pueden ser utilizados 
por varios niños, hasta un máximo de cinco. 

La particular estructura de este tipo de progra- 
mas necesita dos funciones completamente se- 
paradas: la generación de las preguntas y su de- 
sarrollo. Por tanto, se han previsto dos menús. El 
primero sólo debe emplearse para la generación 
del sistema e introducción de las preguntas, y el 
segundo para su utilización. En la segunda foto 
de la página 2092 se presenta el menú de gene- 
ración. La voz 1 (Generación del sistema), prime- 
ra a activar, prevé las funciones. 


= Generación de los ficheros en los que se me- 
morizarán las preguntas, los nombres de los 
niños y los eventuales textos de explicaciones 


que siga la evolución del niño a medida que va 
aprendiendo. 

Otro aspecto de notable interés, porque ayuda 
mucho en el aprendizaje de la lengua estudiada 
en la escuela, es su uso «autodidáctico». 

En el estudio de un idioma extranjero, la mayor 
dificultad consiste en aprender un gran número 
de vocablos. 

Esta actividad no requiere más que un empeño 
constante, la cual puede realizarse con la ayuda 
del ordenador. En este caso es el propio estu- 
diante el que se prepara los tests que deberá su- 
perar después, utilizando la máquina para la ges- 
tión del vocabulario. 

Finalmente, la estructura modular del software 
permite utilizar muchas partes del procedimiento 
para otras aplicaciones, incluso diferentes a la de 
base, e incluso introducir variantes en la lógica de 
desarrollo de los ejercicios. 


" Introducción de los usuarios: el sistema pide 
los nombres de los niños que utilizarán el pro- 
grama, para poder memorizar después para 
cada uno la última lección superada 

"m Introducción de datos: en esta fase se introdu- 
cen las preguntas y las correspondientes res- 
puestas, con un método que depende de la ló- 
gica elegida entre las previstas, o sea: 

— Comprobación ortográfica de 10 vocablos 

— Comprobación asociación vocablos presenta- 

dos. 


La máscara vídeo para la introducción de pre- 
guntas, la selección del método y la indicación de 
las respuestas es común a todas las funciones, y 
sólo varía el valor numérico a asociar al vocablo. 
En base a este valor (flag), el sistema reconoce el 
tipo de pregunta e indica la lógica que debe se- 
guirse en cada caso. 


m El valor 1 es respuesta correcta, y el O errónea 
"m Para la asociación con presentación se usan 
valores entre 1 y 10. 


En la tercera foto de la página 2093 se ha repre- 
sentado la máscara utilizada para la primera ver- 
sión (ortografía). Su uso consiste en escribir 10 
vocablos indicando, para cada uno, si es correc- 
to (1) o erróneo (0). Durante la utilización del test, 
al niño se le presentan los mismos vocablos, de 
los que deberá indicar los correctos. En la tabla 
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de la página 2129 se ha representado un ejemplo 
de la segunda forma de uso: a los vocablos ante- 
riores (escritos en la forma correcta) se han aña- 
dido las traducciones en castellano. En este caso, 
al preparar el test, debe indicarse la correspon- 
dencia para cada uno. En la lista, los vocablos 6 
a 10 son las traducciones de los ingleses 1 a 5, 
y el indicador señala cuáles son las asociacio- 
nes entre ellos. Por ejemplo, «brass» tiene como 
traducción castellana «latón», por lo que debe 
asociarse al vocablo que tiene el valor 9 como in- 
dicador. 


Main general. El procedimiento Ortografía está dividido 
en cuatro programas que realizan por separado las 
funciones de creación y gestión de los archivos que 
contienen las preguntas. Para agilizar el uso de cada 
programa se ha previsto un módulo de carga con el que 
lanzar el programa deseado. 

Con esta subdivisión puede hacerse que el niño al que se 
le presentan las preguntas sólo utilice los programas de 
desarrollo de las lecciones (números 3 y 4 de la foto). - 


Generación lecciones con sólo texto: menú. El primer 
programa sirve para la creación de los archivos que 
contienen las lecciones, y prevé la introducción en el 
disco únicamente de vocablos. Este programa es el más 


no sólo correspondientes a la correcta ortografía de los 
vocablos, sino que cada presentación corresponde a un 
tema general al que se refieren las 10 preguntas. 

La primera función del menú (Generación del Sistema) 
también es la primera que debe activarse si el diskette 
que va a contener los datos nunca se ha utilizado 
anteriormente. 


Generación del sistema. La Generación del sistema se 
utiliza para preparar un nuevo diskette de datos: la 
primera operación realizada en esta fase es el control 
sobre la existencia o no de los ficheros datos (esta 
comprobación se hace para evitar la pérdida de 
eventuales datos introducidos anteriormente en el 
diskette). 

Una vez creados los ficheros datos en el soporte, se 
introducirán los nombres de los cinco usuarios que 
utilizan las lecciones de este diskette datos. El último 
paso de la Generación es la introducción de las 
lecciones, cuyo número siempre se establece en esta 
fase y se introducen en secuencia. Después sólo será 
posible efectuar correcciones en las lecciones 
introducidas en la Generación y no posteriores 
introducciones. 


indicado para el uso general: pueden insertarse lecciones 


El segundo método utilizado en los programas 
dedicados a la ortografía se vale de una subruti- 
na gráfica para presentar el dibujo de un objeto y 
varios nombres. El niño debe indicar, entre los 
presentados, el que corresponde al objeto mos- 
trado. En la primera foto de la página 2095 se ha 
representado el menú de generación de pregun- 
tas y respuestas y, en la siguiente, un ejemplo de 
uso. La presentación de la máscara que aparece 
durante la introducción de usuarios se ha omitido 
en este caso porque es idéntica a la del progra- 
ma anterior. 


INTRODUCIR EL NUMERO CORRESPONDIENTE 
AL PROGRAMA DESEADO 


GENERACION LECCIONES SOLO TEXTO 

> DESARROLLO LECCIONES SOLO TEXTO 
GENERACION LECCIONES CON GRAFICOS 
DESARROLLO LECCIONES CON GRAFICOS 
FIN DE TAREA 


- Generacion del 
Correccion lec 
Correccion t 
Introduccion cciones 

Introduccion texto 


Fin de tarea 


Ediciones 


eneracion d 
E PR 


INTRODUCCION USUARIOS 
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Introducción del texto. Siempre en el programa de 
creación de los archivos de lecciones con sólo vocablos, 
es posible introducir un texto explicativo que podrá ser de 
orientación para el niño durante el desarrollo de las 
lecciones. 

Este texto es común a todas las lecciones introducidas en 
el diskette datos, y está constituido por dos 
presentaciones en pantalla consecutivas de 20 líneas x 
35 caracteres cada una; durante el desarrollo de las 
lecciones podrá pedirse en cualquier momento. 


Corrección datos. La voz 2 del menú permite efectuar 
variaciones en lecciones introducidas en la fase de 
Generación. Una vez el usuario ha introducido el número 
de la lección a variar, ésta se lee en el disco de datos 
(cada lección está formada por 12 registros) y se 
presenta. A través de la data entry es posible aportar las 
necesarias modificaciones e introducir la lección variada 
en el fichero datos en el mismo registro lógico de origen. 
La lección pedida se presenta en pantalla y es posible 
variar cada una de sus partes: en el campo Preguntas se 
ha insertado el tema principal al que se referirán los 10 
vocablos que constituyen la lección. En el campo 
indicador se insertarán los siguientes valores numéricos: 
1 identifica la condición de veracidad. 

0 : identifica los vocablos erróneos 

1 = 10: utilizados para las asociaciones. 


La corrección de los vocablos correspondientes a la 
lección a modificar se realiza después de la corrección 
de la figura. 

Aparece la leyenda de ayuda, con lo que quedan 
disponibles todos los comandos de la data entry. 


Menú desarrollo del texto. Las funciones utilizables 
durante el desarrollo de las lecciones se relacionan en el 
menú principal del programa de utilización de las 
pruebas con sólo vocablos. 

La primera voz, Presentación del texto, puede ser 
activada por el niño si éste desea leer las notas 
explicativas que le serán útiles para comprender el tema 
general de la lección. 


Correcciones datos 


re 


Edic 


gunt: 


¡ones +Oorunm > 


¡raduccion, 


ANDIL ADUR 


JR 
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Lista usuario. Mediante la lista usuario, voz 2 del menú 
principal, en el diskette se leen los datos y los nombres de | E-LG.S. Ediciones Forum, S.f. 
los cinco niños a los que se ha reservado dicho soporte l Lista usuarios 
magnético. Los nombres se presentan en pantalla junto al A AA AAA 
número de la última lección superada, para tener así en 
cuenta en cualquier momento el nivel de preparación o el 
grado de aprovechamiento de los cinco niños que  * 
realizan las lecciones. 


suarioMUltima leccion superada 


Desarrollo lecciones. Las lecciones introducidas en la 
fase de Generación del diskette datos pueden ser 3 Ediciones Forum, SA 
realizadas individualmente por cada uno de los cinco Desarrollo lecciones! 
usuarios. Para ello, el programa pide qué usuario va a No ren 

realizar la lección, el nombre introducido se comparará 
con los cinco que hay en el archivo y, una vez localizado, 
se leerá el número de la última lección superada por INTRÓDUCIR EL NOMBRE 
aquel nombre. ? Teresall 

En el caso de la foto, el nombre introducido es Teresa, y la E 
primera lección a realizar es la número 3 del archivo 
porque (como puede leerse en la Lista usuarios) Teresa 
ha realizado correctamente las dos primeras lecciones. 


METETY AYUDA 


Una vez identificado el nombre del usuario pedido, el 
programa pasa a leer la primera lección que todavía debe 


S diciones Forun, 


voz 31 


realizar. Se presentan el número de la lección y el tema | Desarrollo lecciones 
tratado, así como los 10 vocablos, y a través de la data : : . 
entry, el programa espera la introducción de las LECCION 3 Tema : Mamiferos 


respuestas. Estas se compararán con las previstas en la JOCABLO JERD./FALSO) 
fase de Generación y, según la igualdad o no con ellas, y 
se presentará el mensaje de lección superada o de error. 


AAA 


Para la introducción de las respuestas, el niño interrogado 


utiliza la data entry: así le es posible escribir palabras en voz 3 ABE Ediciones Forum, S.A 
lugar de los valores introducidos en la fase de Desarrollo lecciones] ! 
Generación. UR TIT REUS 
Para ello se tienen las igualdades: LECCION 2 lema : Con motor ? 


«Verd.»= valor 1 en la Generación JULCABLO] YERD. /FALSO 
«falso» = valor O en la Generación E y 

Los valores útiles para las asociaciones, comprendidos 
entre 1 y 10, deberán introducirse exactamente iguales a 
los previstos en la Generación. 


a0nanauUNa 


O 


ERRONEO 


ñAYUL 
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Generación con gráficos: menú. El programa de 
generación de las lecciones con figuras también prevé un 
menú con el que seleccionar la función deseada. 

En la fase de introducción de las lecciones se crearán los 
dibujos (sprites) con los vocablos a asociar. Además es 
posible la corrección de las lecciones. Al igual que en el 
programa de Generación con sólo texto, también hay un 
texto explicativo sobre la orientación general de todas las 
lecciones que hay en el soporte magnético. 


Introducción lecciones. Se ha seleccionado la voz 4 del 
menú principal; la primera introducción es la del sprite 
que constituirá la figura de la lección. 

Los comandos para la creación del sprite son: 

CRSR UP = mueve el cursor arriba (1) 

CRSR DOWN = mueve el cursor abajo (1) 

CRSRLEFT = mueve el cursor a izquierda (.-) 

CRSR RIGHT = mueve el cursor a derecha (-.) 

| = ilumina el punto en que hay el cursor. 


A = apaga el punto en que hay el cursor. 

R = graba los datos correspondientes a la 
figura en el disco. 

F7 = vuelve al menú principal (anulando la 


introducción). 


Una vez construida la figura que ilustrará las lecciones, el 
usuario ha introducido los cinco vocablos en la parte 
reservada al texto. 

Para indicar cuál de los cinco vocablos es el correcto, se 
ha introducido el número 1, mientras que el número O 
indica los vocablos erróneos. 


Corrección lecciones. Seleccionando la voz 2 del menú 
principal es posible aportar variaciones a los datos de 
cualquier lección introducida anteriormente. 

La lección a modificar se leerá en el disco datos y se 
presentará al usuario: para una rápida identificación en el 
archivo se pide el número de la lección, comprendido 
entre 1 y el número de la última introducción (leído en el 
primer registro del fichero datos). 


LEEN 


TIRO 


Generacion del sistema 


Correcciones datos 


Introduccion texto 
Correcciones texto 
Fin de tarea 


menu 

ilumina 
apaga 

introduce 


i- House 
2- Dog 

3- Garden 
4- Pencil 
5- Church 


LECCION M. 2 


Ediciones Forun 


mn y HS TLTALSS 
orreccion lecciones 


introducir el numero de leccion 
a variar ( 1 - 1378 


Durante la modificación del sprite de una lección ya 
introducida, se dispone de los mismos comandos 
descritos en la fase de introducción. 

El sprite original se presenta en el ángulo superior 
derecho para ofrecer al usuario el tamaño natural de la 
figura insertada en la lección. 


ga 
cintroduce 


b 
C 
d 
e 
f 
9. 
ho 
i 
y 
k 
1 
m 
Y) 
o 
P 
q 
el 
s 
t 
y 


Al mismo tiempo que el sprite se presentan el texto (o sea 
las preguntas) y los valores de los punteros para aportar 
las eventuales modificaciones. 


s5- 


LECCION M. 


Desarrollo gráficos: menú. Las funciones previstas por 
este programa son idénticas a las realizadas por el 

programa de desarrollo con sólo texto. Activando la voz 1 
es posible leer el texto ilustrativo de las lecciones: la Lista 
de usuarios en cambio es útil para conocer el nivel de 
aprovechamiento de los 5 niños a los que se ha reservado Presentacion del texto 


el diskette datos. Lista usuarios 


Desarrollo lecciones 
Fin de tarea 


Desarrollo lecciones. Una vez introducido el nombre del 
usuario que se quiere consultar (uno de los cinco 
introducidos en la Generación), se pasa al desarrollo de 
las lecciones, empezando por la primera no solucionada. 
En la parte de arriba a la izquierda se presenta el nombre 
del niño que está realizando las pruebas. El ángulo de 
arriba a la derecha se reserva para la presentación de los 
mensajes de error o de respuesta correcta. 


Diferente 
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RELACION DE LAS VARIABLES - COMMODORE 64 


Versión con sólo texto 


B$(+*) = matriz de los buffers (1 por 
campo de introducción 

LC(«*) = longitud del campo de in- 
troducción 

ND(+*) = número de decimales en el 
campo de introducción 

a 


CY (+) 


DX(«) 
DY (:) 


= coordenadas en la pantalla 
del campo de introducción 


= coordenadas en la pantalla 
de la descripción 
TF(+) = matriz numérica que con- 
tiene códigos ASCII de las 
teclas comando 
DS(+) = descripciones en máscara 
vídeo 
VO$(+) = voces del menú principal 
BL$  = blank 
PD$  —=punto decimal 
AS$  =carácter “—”; ¡identifica 
campos introducción alfa- 
numéricos 
NS$ =carácter “*”; ¡identifica 
campos introducción nu- 
méricos 
HO$  = borra la pantalla 
NUC =número de campos intro- 
ducción en máscara vídeo 
activada 
DS = número descripciones en 
máscara vídeo 
HS(+«) = matriz que contiene las ca- 
denas ayuda 
FIS(*) = matriz nombres ficheros 
datos usados 
LF(*) = longitud registro (en bytes) 
de los ficheros tratados 
NL = número lecciones a variar 
y lecciones a introducir en 
generación 
= registro principio lección 
= registro fin lección 
= Cadena usada para lectura 
y escritura datos 
= indican eventuales errores 
en el disco 


Versión con gráficos 


BS$(*) = matriz de los buffers (1 por 
campo de introducción 

LC(«*) = longitud del campo de in- 
troducción 

ND(+*) = número de decimales en el 
campo de introducción 

CX(+) 

CY (+) 


DX(+) 
DY (+) 


= coordenadas en la pantalla 
del campo de introducción 


= coordenadas en la pantalla 

de la descripción 

TF(*) = matriz numérica que con- 
tiene códigos ASCII teclas 
comando 

DS(+*) = descripciones en máscara 
vídeo. 

VOS(«) = voces del menú principal 

BL$  = blank 

PD$  —= punto decimal 

AS$  =carácter "“—; identifica 
campos de introducción 
alfanuméricos. 

NS$ =carácter "*x”; identifica 
campos introducción nu- 
méricos. 

HO$  = borra la pantalla. 

NUC  =número de campos intro- 
ducción en máscara vídeo 
activada. 

DS = número de descripciones 
en máscara vídeo. 

FIS(*) = nombres ficheros datos 
usados. 

HS(+*) = matriz cadenas para ayu- 
da. 

= longitud registros en fi- 
cheros datos 

= matriz valores para sprite. 

= cadena de 1/O con el disco. 

= bloque datos para sprite. 

= posición partida para los 
datos sprite. 

TA(«*) =teclas comando en crea- 

ción sprite. 
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RELACION DE LAS VARIABLES - PHILIPS VG 8010 


Versión con sólo texto 


M3 =número máx. lecciones (puede 
variarse) 

AAS$(M3) = contiene las lecciones 

TS$(24) = contiene el texto (24 líneas) 

NUS = contiene el nombre del usuario y 
el puntero a la última lección su- 
perada 

K = puntero lección en curso 

BM$ =indica introducción errónea 

BB$ = indica introducción correcta 

BP$ =indica error 

BS(«) = matriz de los buffers (1 por campo 

] de introducción) 

LC(x) = longitud del campo de introduc- 
ción 

ND(+) =número de decimales en el cam- 
po de introducción 

CX(x) 

CY (x) 


Ela =coordenadas en pantalla de la 

DY (x) A 
descripción 

TF(+) = matriz numérica que contiene los 
códigos ASCII de las teclas de co- 
mando 

TP(+) =tipo del campo de introducción 

D$(+) = descripciones en la máscara ví- 
deo 

VOS(x) =voces del menú principal 

BLS$ = blank 

PD$ = punto decimal 

AS$ = Carácter "—". Identifica los campos 
de introducción alfanuméricos 

NS$ =carácter “*”. Identifica los cam- 
pos de introducción numéricos 

NUC =número de campos de introduc- 
ción en la máscara activada 


= coordenadas en pantalla del cam- 
po de introducción 


Versión con gráficos 


=número máx. lecciones (puede 
variarse) 
DI$(M3, 4) 
SS$(M3, 4) 
AAS$(M3, 4) 
LES$(M3) 


AAS$(0) 
LES(0) 


= contienen los datos de los sprites 


eri los datos de las leccio- 


= contienen el nombre del usuario y 
el puntero a la última lección su- 


BMS perada 

BBS$ = contienen sonidos 

BP$ 

URS$ 

H1$ 

CUR$ 

JK, NL = puntero lección en curso 

sn 
...3$(4) 


ha = color de los sprite de la lección en 
curso 

BS(x) = matriz de los buffers (1 por campo 
de introducción) 

LC(x) = longitud del campo de introduc- 
ción 


= contienen la cabecera 


= datos de los sprites de la lección 
en curso 


ND(«) =número de decimales en el cam- 
po de introducción 

CX(+) 

CY (+) 


med =coordenadas en pantalla de la 

(+) descripción 

TF(=) = matriz numérica que contiene los 
códigos ASCII de teclas de co- 
mando 

DS$(+) = descripciones en la máscara ví- 
deo 

VOS(+) =voces del menú principal 

BL$ = blank 

PD$ = punto decimal 

AS$ = identifica los campos de introduc- 
ción alfanuméricos 

NS$ = identifica los campos de introduc- 
ción numéricos 

NUC =número de campos de introduc- 
ción en la máscara vídeo 


= coordenadas en pantalla del cam- 
po de introducción 


Generador de sonidos 


MSS(x) = cada elemento contiene la octava, 
la duración y la nota correspon- 
diente a las teclas pulsadas en 
función REG-ON 

CR = índice de MS$(x) 

KR = número máximo de notas introdu- 

cidas en MS$(«) 
= contiene los caracteres del tecla- 
do correspondientes a las notas 

= contiene el tipo de sprite que indi- 
ca la nota activada (hay 4 tipos de 
sprites) 

=abscisa de principio de cada te- 

cla del teclado a la que se refiere 
la instrucción para la aparición de 
los sprites 

=o0ctava base de la nota 

=síimbolo (en notación inglesa) de 

la nota 

L$ = duración de la nota 

sw =si= 1, permite la memorización 
en MS$(*) de las notas activadas. 
Si = -1, no memoriza 

G$ =cCarácter introducido por teclado 
(inkeyS) 


AAS(20) 


AA(20,1) 


AA(20,2) 


N$(20,1) 
N$(20,2) 


Significados de las teclas funcionales 


= decrementa la octava del teclado 

= incrementa la octava del teclado 

= decrementa la duración de la nota 

= incrementa la duración de la nota 

= introduce una pausa (duración se- 
microma) 

=reescucha notas y pausas graba- 
das 

= eventual grabación en cinta y fin 

= activa o desactiva la grabación 

= reescucha de una nota “hacia ade- 
lante” 

=reescucha de una nota “hacia 
atrás” 


La lógica del programa 


La finalidad del programa es la de enseñar la co- 
rrecta ortografía de las palabras de una lengua 
cualquiera. Para obtener la máxima elasticidad 
de uso, el procedimiento debe ser completamen- 
te parametrizado y adaptable, por parte del usua- 
rio, a cada posible aplicación. 

Este objetivo puede obtenerse reuniendo los tres 
módulos principales: Gráficos, Sonido y Texto. El 
procedimiento se presenta en dos versiones: el 
primero utiliza los gráficos, y sus posibles aplica- 
ciones son más limitadas; el segundo sólo prevé 
textos y es más generalizable, pero resulta menos 
ameno. En la página 2090 se ha representado el 
esquema lógico de las dos versiones. Su diferen- 
ciación se hace en los bloques de lectura de re- 
gistros del fichero de preguntas y en la presenta- 
ción. 

En la versión que no utiliza gráficos, los bloques 
sólo realizan las funciones indicadas, o sea la lec- 
tura de registros, presentación del contenido y 
espera y comprobación de la respuesta. En la 
otra versión, el procedimineto es más complejo y 
se describe a continuación. 


Versión con sólo texto 

En el gráfico de la página 2129 se muestra la es- 
tructura de fichero utilizada. Una lección está 
constituida por un conjunto de 10 vocablos deli- 
mitado por dos registros particulares. El primero, 
al principio del grupo, contiene el símbolo «—» y 
el número de la lección y el segundo, posiciona- 
do al final del grupo, contiene los símbolos «* * *» 
que indican el final de la lección. 

Las posibles lógicas de uso del programa son: 


" Simple control de la grafía: entre los 10 voca- 
blos habrá algunos escritos correctamente 
(identificados con P = 1) y otros erróneamente 
(P = O). Durante el uso se pide la indicación 
de los erróneos. 

= Comprobación de la asociación: los 10 voca- 
blos están divididos en dos grupos (de 1 a 5 y 
de 6 a 10) relacionados entre sí mediante el 
puntero P, que si asume un valor mayor que 1 
indica una asociación. Después de la presen- 
tación de los vocablos, el usuario deberá indi- 
car las correspondencias. La máquina com- 
prueba las respuestas mediante el puntero P. 
Por ejemplo, en el gráfico en cuestión, el voca- 
blo «sea», que tiene el puntero 8, debe aso- 
Ciarse al vocablo «mar» (octava posición). 


La selección entre los dos posibles modos de 
funcionamiento (control ortográfico o asociación 


entre vocablos) se obtiene automáticamente se- 
gún el valor de P de los primeros 5 vocablos. 

Si P vale O o 1 se trata del primer caso y, si no, del 
segundo. En la página 2128 se ha representado el 
diagrama de esta versión del programa, en la que 
se supone que los ficheros ya se han preparado 
con el adecuado procedimiento presentado más 
adelante (las dos funciones, preparación y uso, 
son independientes, porque corresponden a dos 
usuarios diferentes). 

La fase de presentación de preguntas y gestión 
de respuestas se articula en dos flujos principa- 
les. En la primera parte se presentan en pantalla 
los vocablos sin ninguna asociación mediante la 
subrutina de presentación de máscara (2000), 
por lo que el usuario interrogado introducirá, utili- 
zando la data entry, las respuestas (y el valor de P 
asociado a cada vocablo). 

En la segunda parte se comparan los valores in- 
troducidos con los previstos en la fase de genera- 
ción, y se presenta el mensaje de respuesta co- 
rrecta o errónea. Por tanto, las respuestas se 
comprueban en función del valor del flag (1 = Sí, 
O = No) que debe implantarse en la generación. 


Comprobación ortográfica. La lectura del texto 
que constituye la pregunta y su presentación en 
pantalla requieren algunos trucos especiales pa- 
ra que también sean válidos en las versiones de 
disco. En el diagrama se muestra la técnica gene- 
ral utilizada. Para el detalle de cada función debe- 
rán consultarse los diagramas y listados que si- 
guen. El presentado en la página siguiente sólo 
es una parte del anterior, desarrollado para mos- 
trar cómo se gestiona el fichero de las preguntas. 
Tiene una validez a nivel de método, que en su 
mayor parte no corresponde con los listados. 
Cada grupo de datos que constituye una lección 
está distribuido en diferentes registros del fichero. 
Por tanto, para leer una lección completa deben 
leerse varios registros. Un método muy simple 
consiste en generar un bucle sobre un número de 
registros igual al paso, o sea igual al número de 
registros necesarios para memorizar una lección. 
En esta aplicación, por ejemplo, bastan 10 regis- 
tros. Sin embargo, en general, utilizando estructu- 
ras similares de datos, conviene iniciar el grupo 
con un símbolo particular. En el ejemplo se ha 
utilizado el signo «—». 

Si el programa encuentra el símbolo al leer el re- 
gistro, significa que está en la fase correcta y 
puede proseguir con la lectura de los 10 registros 
que siguen. En caso contrario, se ha producido 
un error y el programa se detiene. Naturalmente, 
el símbolo utilizado como flag de inicio de lección 
debe escribirse en la generación de las pregun- 
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MODULO DIDACTICO: COMPROBACION 
ORTOGRAFICA CON SOLO TEXTO 


Apunta al principio del 
fichero preguntas 


El fichero Preguntas para la 
versión cinta es de tipo 
secuencial 
Bucle de búsqueda en la zona 
que contiene los 10 registros 
datos de la lección n.* NL + 1 O 
El bucle sólo es necesario 
en la versión cinta. Para el disco 
se sustituye por el acceso directo 


al regi , 
paña Se ha producido un error de 


sistema, por lo que se han 
perdido los punteros 


Los datos se han transferido 

a B$(:) y se presentarán en dos 
columnas de 5. Los punteros 
están en P(:) 


Esta función sirve para superar 
el registro de cierre de datos 
(el que contiene los 

simbOIlOS xxx) 


La rutina de presentación 
también actualiza el fichero 
Usuarios, por el que sólo vuelve 
si la respuesta es correcta 


(*) Las preguntas se presentan y gestionan a través de la data entry, por 
tanto, se llamarán las subrutinas 2000 y 3000 
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ESTRUCTURA DEL FICHERO PREGUNTAS 
EN LA VERSION CON SOLO TEXTO 


E 
Indicador de principio lección 


Conjunto de datos pertenecientes a una lección (12 registros) 


Vocablos y punteros 
en la introducción 


brass 
sea 
scuttle 
river 
raw 


río 
crudo 
mar 
latón 
cubo 


El puntero 
del vocablo 


Este puntero puede tener asociado es 
valores O (erróneos), 1 (correcto) o igual al del 
comprendido entre 6 y 10. En vocablo 
este caso indica el vocablo asociador 


asociado 


Vocablos y punteros 
asociados 


brass río (puntero = 6;4) 
sea crudo (puntero = 7;5) 
scuttle mar (puntero = 8;2) 
river latón (puntero = 9;1) 
raw cubo (puntero = 10;3) 


Principio 
siguiente 
lección 
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tas. Las otras partes de la rutina son lecturas nor- 
males de disco y presentaciones de máscaras. 


Introducción datos. Este módulo debe prever 
dos modos de funcionamiento. En el primero pue- 
den introducirse hasta 10 vocablos, indicando la 
condición verdadero o falso para cada uno, o sea 
si es correcto o erróneo. De esta manera se dis- 
pone de diferentes modalidades de funciona- 
miento. Por ejemplo, pueden introducirse 9 voca- 
blos con ortografía errónea (flag = 0) y uno co- 
rrecto (flag = 1), en cuyo caso, el programa se 
utiliza a un nivel de dificultad mínimo, mientras 
que introduciendo más vocablos correctos puede 
utilizarse para comprobar los conocimientos de 
sinónimos o las capacidades deductivas. En par- 
ticular, pueden agruparse en la misma lección al- 
gunos vocablos inherentes al mismo objeto y 
otros extraños al mismo, invitando al usuario a 
que indique los homogéneos. 

La segunda forma, asociativa, presenta un solo 
modo, el cual permite la escritura de un vocablo 
en una lengua y la traducción en otra. 

Como complemento de la fase de preparación 
debe preverse un procedimiento para la introduc- 
ción de las notas de explicación. En los diagra- 
mas anteriores, esta función no se muestra, pues- 


to que se reduce a la simple presentación del 
contenido de un fichero que debe activarse antes 
de la petición del nombre del usuario (es una sub- 
rutina de lectura de fichero y presentación en ví- 
deo llamada al principio del programa). Y vicever- 
sa, en esta fase debe preverse su preparación y, 
por tanto, la generación y la introducción, o even- 
tuales correcciones, de las explicaciones. 

El fichero está constituido por un máximo de 40 
registros, cada uno con 35 caracteres, que se 
presentan con dos pantallas de 20 cada una. 
Para su gestión basta con definir una máscara 
con 20 campos de 35 caracteres alfanuméricos 
sin descripción, aunque debe prestarse atención 
al modo utilizado para la memorización. En la 
gestión normal de las máscaras, el contenido de 
una pantalla vídeo, memorizado en B$(«w), ocupa 
un solo registro, por lo que la formación del regis- 
tro consiste en sumar todos los campos uno des- 
pués de otro (B$(1) + B$(2) + ...), mientras que 
en este caso, cada buffer forma un registro y, por 
tanto, la escritura en el disco consiste en un bucle 
entre 1 y 20 para la primera presentación y entre 
21 y 40 para la segunda. Abajo se ha representa- 
do el diagrama general del programa de introduc- 
ción de datos, y en las páginas 2131 a 2133 se 
han desarrollado con cierto detalle las principales 


PROGRAMA DE INTRODUCCION DATOS: VERSION SOLO TEXTO 


O— 


Generación 
12000 


2130 


y 


Las funciones previstas son: 
- Introducción nuevos datos 
- Corrección datos 
- Introducción texto de 
explicación 
Corrección texto 
- Fin de tarea 


Introducción 
texto 


8000 


GENERACION 


Generación 
ficheros 


Introducción 
Usuarios 


12100 


“Introducción 


de Datos 
12200 


El programa avisa que debe 
introducirse un nuevo diskette 


Se han creado los ficheros: 

Datos: 100 registros (*) de 18 
bytes (***) 

Texto: 40 registros de 35 bytes 


Nombre: 5 registros de 22 bytes 
pens 


V 
Todos en blanco (o con otro 
símbolo que indique registro 
no ocupado) 


(*) Registros logicos, o sea lecciones Como cada lección esta compuesta por 12 registros fisicos. en total hay 100 x 12 = 1200 registros fisicos 


(**) 16 bytes el vocablo y 2 para el flag (P) 
(***) 20 bytes para el nombre y 2 para el numero de lección (ultima superada) 


subrutinas de introducción utilizadas. Los diagra- 
mas de actualización no se presentan porque son 
análogos a los de introducción. 

El diagrama de la página 2130 muestra la estruc- 
tura general del programa de generación de las 
preguntas. Las subrutinas utilizadas son iguales O 
análogas a las de los demás programas. La única 
diferencia consiste en el modo de gestión de los 
datos que constituirán las lecciones. Como se ve 
en el menú principal, no se ha previsto la intro- 
ducción, sino sólo la variación. 

Esto se debe a la particular subrutina de genera- 
ción (1200) del sistema, que incluye otras funcio- 
nes además de la de preparación normal de los 
ficheros. 

En el diagrama de arriba se ha desarrollado con 
detalle la Generación del sistema. La primera fun- 
ción de esta subrutina es la creación de los fiche- 
ros, con los formatos indicados en la tabla (re- 
cuérdese que estos valores se refieren a las ver- 
siones disco). 


Al final se activa automáticamente la introducción 
de los nombres de los usuarios (subrutina 12100) 
y, a continuación, la de los datos que constituirán 
las lecciones (12200). Volviendo al diagrama prin- 
cipal, obsérvese que se ha previsto la introduc- 
ción de un texto de explicación de las lecciones, 
constituido por 40 líneas de 35 caracteres. La 
gestión de esta página de texto se obtiene con la 
data entry utilizada normalmente. 


Introducción usuarios. La introducción de los 
usuarios emplea una sola pantalla vídeo para 5 
posibles nombres, por lo que se necesitan punte- 
ros que puedan desempaquetar el buffer BS(wx) 
en 5 registros diferentes. La primera función es la 
carga de los parámetros que definen la máscara 
vídeo (subrutina 7000) en la que deben definirse 
todos los campos correspondientes a los 5 nom- 
bres (todo esto es válido para las versiones disco. 
Para la cassette, el problema se supera con la 
limitación a un solo usuario). 
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INTRODUCCION USUARIOS y) 


Transfiere 
al disco 


Antes de presentar la máscara se transfiere el va- 
lor O a cada uno de los campos que deberán con- 
tener el número de la última lección que se ha su- 
perado. 

Siguen las acostumbradas subrutinas de presen- 
tación y gestión de máscaras y la transferencia al 
disco de los datos. 

Obsérvese que la transferencia debe realizarse 
con un bucle de 1 a 5, y en cada registro debe 
colocarse la suma de los buffers N y N + M (con 
M valor impar). 


Introducción datos (lecciones). La introducción 
de las lecciones (preguntas y flags) se realiza de 
manera estructuralmente análoga a la de los otros 
programas, añadiendo la gestión de los registros 
de inicio y fin de lección. Como se ha visto ante- 
riormente, una lección puede estar compuesta 
por varios registros (en esta aplicación son 10 de 
datos y 2 para la comprobación de inicio/fin), por 
lo que al principio y al final del bloque deben es- 
cribirse unos identificadores. 
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La máscara Usuarios presenta los 
5 posibles nombres, todos en la 
misma pantalla vídeo 


Los campos que contienen el 
número de la última lección 
superada son los que tienen 
índice par (2, 4, 6, 8, 10), 

por lo que el bloque es un bucle 
con paso 2 


En los campos con índice par 
aparece 00, en los DATA se 
definen en la presentación 


La transferencia se hace 
nombre por nombre, cada uno 
en un registro: 

B$(1) + B$(2) registro 1 

B$(3) + B$(4) registro 2 

etc. 


En particular, al inicio se escribe el signo «—» en 
un determinado byte, mientras que al final se es- 
cribe un registro con los símbolos «sk x x». Debido 
a esto, el diagrama presenta algunas funciones 
más que lo usual. Una introducción normal termi- 
naría con la escritura de los datos en el disco, 
inmediatamente después de la salida de la data 
entry, con FS = 5. En cambio, en este caso, pri- 
mero hay que escribir un registro de inicio de blo- 
que (símbolo «—»), desarrollar después un bucle 
sobre las 10 líneas de la máscara memorizando 
cada una en un registro (cada línea contiene en 
BS$(N) el texto, y en BS$(N + 1) el flag correspon- 
diente). Al final de este bucle debe cerrarse el 
conjunto de los datos de la lección con un regis- 
tro que contenga los simbolos «xk x sk». 

Esta función podría ser la propia presentación de 
las preguntas en la forma que serán utilizadas por 
el niño y así poder comprobar su eficacia. Sin em- 
bargo, su introducción complicaría excesivamen- 
te los listados y por esto se ha omitido, dejando al 
usuario su eventual incorporación. 


Presentación preguntas y 
gestión respuestas. La 
comprobación de las res- 
puestas consiste en leer, 
para cada pregunta, la res- 
puesta dada y compararla 
con la correcta memorizada 
en el fichero. El diagrama de 
la página 2134 muestra un 
método generalizado (por lo 
que no se ha numerado). 

La comprobación se realiza 
con un bucle que controla la 
igualdad entre las cadenas 
BS$(respuesta dada) y AS(x) 
(respuesta correcta memori- 
zada). 


Versión con los gráficos 


La lección consiste en la 
presentación de un dibujo y 
5 vocablos, de los cuales 
uno, o más, se refiere a la 
imagen. El niño debe indicar 
cuál es el nombre correcto 
del objeto entre los que se 
presentan. También en esta 
versión pueden tenerse va- 
rios grados de dificultad en 
función de cómo se introdu- 
cen los datos. 

En el caso más sencillo, a 
cada figura hay asociados 4 
vocablos erróneos, que indi- 
can un objeto diferente, y 1 
correcto. 

En el caso más complejo 
pueden introducirse sinóni- 
mos o vocablos con errores 
de ortografía. La elección 
del grado de dificultad sólo 
depende de los datos intro- 
ducidos y, por tanto, está 
completamente desvincula- 
da del programa. Para esta 
aplicación también debe se- 
pararse la generación de las 
preguntas del desarrollo y, 
por tanto, la estructura del 
programa es análoga a la 
de los anteriores. La única 
diferencia consiste en el for- 
mato del fichero archivo pre- 
guntas y respuestas, que 
debe contener los datos ne- 
cesarios para la generación 
de las figuras, y en la subru- 


INTRODUCCION DATOS (LECCIONES) 


Escribe el 
primer registro 
de la lección 


Transfiere 
al disco 


Principio bucle lecciones: 
el máximo previsto es 100 


El primer registro contiene el 
simbolo "b" en los bytes 1 y 2 
mientras que en los 16 
restantes, el valor "l" es 

el tema de las lecciones 


Los datos se presentan 
asociando los vocablos 
(punteros > 5) o los 
erróneos invertidos 


Al disco se transfieren 10 
registros, cada uno 
correspondiente a una línea 
de la data entry: 
B5$(1) + B$(2) registro 1 de 
la lección 
B$(3) + B$(4) registro 2 de 
la lección 
etc 
El registro está compuesto de 
2 simbolos * y 16 espacios 
(u otros simbolos cualesquiera) 
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tina de creación y modifica- 
ción del dibujo. 

En la página 2135 se ha re- 
presentado el esquema de 
principio de la nueva estruc- 
tura del fichero. Dadas las 
notables diferencias de las 
gestiones de los gráficos, se 
han presentado por separa- 
do las tres versiones (C-64, 
DOS y MSX). 

En la primera (C-64) se ha 
previsto la generación de fi- 
guras por medio de sprites. 
No se han introducido los 
gráficos de alta resolución 
porque tienen una gestión 
muy compleja, y para esta 
aplicación no ofrecen sufi- 
cientes ventajas. 

En la versión DOS, al faltar la 
gestión de los sprites, es ne- 
cesario utilizar los gráficos 
de alta resolución y, por tan- 
to, la «tabla de desplaza- 
mientos». 

La útlima versión, MSX, pre- 
vé una gestión de los sprites 
que permite una excelente 
resolución sin utilizar progra- 
mas excesivamente com- 
plejos. Estas grandes dife- 
rencias entre las máquinas 
obligan a desarrollar las tres 
versiones del programa de 
manera completamente di- 
ferente, por lo que cada una 
se examinará por separado. 
Para cada versión, las prin- 
cipales características son 
estas: 


m Versión C-64 


La versión está compuesta 
por un solo sprite, puesto 
que su generación en el C- 
64 se hace con direcciona- 


dos directos en memoria, y- 


utilizando tablas de defini- 
ción demasiado extensas 
puede destruirse parte de 
los otros datos utilizados en 
el programa. 


m Versión DOS 


En esta máquina sólo es po- 


2134 


PRESENTACION PREGUNTAS Y GESTION RESPUESTAS 
VERSION SOLO TEXTO 


Actualiza el 
registro Usuario 


El programa pide el nombre 
del usuario que deberá 

ser interrogado y lo compara 
con los ficheros Nombres 

en la generación 


Los últimos 12 bytes del registro 
en el que hay el nombre 
contienen el número de la 

última lección superada por 

el usuario 


Mediante el número de 

la última lección superada 
por el usuario se calcula 
el puntero a las preguntas 
del fichero Datos 


En el registro del usuario, el 
número de lección superada 
se incrementa en 1 


El programa pregunta si 
el usuario desea continuar 
desarrollando las lecciones 


FORMATO DEL FICHERO PREGUNTAS Y 
RESPUESTAS: VERSION CON GRAFICOS 


1 lección = 4 registros 


Sprite (3 registros) 


Versión C-64 


(60 caracteres + "4 A 4”) 


Sprites 


sible el uso de los gráficos de alta resolución y, 
por tanto, la figura se genera y se memoriza como 
una serie de caracteres gráficos. Análogamente, 
las leyendas se obtienen gráficamente presen- 
tando todos los segmentos correspondientes a 
cada letra del texto. Estos caracteres se memorl- 
zan en un fichero de servicio que lee el programa, 
por lo que en la presentación hace falta una rutina 
que analice, carácter por carácter, las leyendas y 
de los datos leídos e insertados en la memoria ex- 
traiga los caracteres correspondientes a los ca- 
racteres de alta resolución. 


m Versión MSX 


En esta versión, los sprites pueden definirse me- 
diante una cadena, por lo que su colocación en 
memoria está a cargo del sistema. 

El usuario no debe especificar las direcciones de 
las tablas. 

Para una mayor versatilidad es posible construir 


Versión DOS 


Versión MSX con sprites 


un dibujo uniendo más sprites, y en el programa 
se han previsto 4, cada uno compuesto de 16 x 
16 puntos. 

En la página 2136 se ha representado el diagra- 
ma de principio de las versiones que utilizan los 
sprites (C-64 y MSX). Los datos (cadenas de defi- 
nición y textos) se memorizan en un fichero único, 
en el que los registros de número par (2, 4, 6) 
contienen los valores para los sprites y los impa- 
res, los textos asociados. Si bien con estructuras 
similares, las dos versiones difieren notablemen- 
te. En particular, la versión MSX permite gestionar 
un elevado número de sprites simultáneamente. 
Aprovechando esta característica, el dibujo está 
constituido por 4 sprites y, por tanto, tiene mayor 
detalle. 

En la página 2137 se ha representado el diagra- 
ma detallado de la subrutina de generación de di- 
bujo en la versión MSX. 

La pantalla está dividida en dos zonas. En la pri- 
mera, arriba a la izquierda, aparecen los coman- 
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dos útiles para la construc- 
ción de la figura y, en la par- 
te central, una retícula que 
representa, muy ampliado, 
el sprite durante su defini- 
ción. Posicionando el cursor 
en la retícula, el usuario pue- 
de identificar cada punto del 
sprite y activarlo. Al mismo 
tiempo, el punto se presenta 
en el conjunto, por lo que 
puede realizarse el desarro- 
llo de la figura a medida que 
se completa cada detalle. 

La definición de cada uno 
de los 4 sprites se obtiene 
mediante 4 cadenas (T$(1), 
T$(2), TS(3) y TS(4)), cada 
una de las cuales contiene 
el valor del punto activado 
convertido en carácter. Por 
ejemplo, la figura obtenida 
activando los puntos mostra- 
dos en la página 2138 está 
constituida por 4 cuadrados. 


m Primer cuadrado, identifi- 
cado por las líneas 1 a 8 
y las columnas 1 a 8. Los 
correspondientes valores 
están en T$(1) 

m Segundo cuadrado, com- 
prendido entre las líneas 
1 a8 y las columnas 9 a 
16, en T$(2) 

m Tercer cuadrado entre 9 
a16y1a8, en T$(3) 

= Cuarto cuadrado entre 9 
at6y2a 16, en T$(4) 


A medida que se desplaza 
el cursor, el valor numérico 
asociado se actualiza. Por 
ejemplo, si el cursor está en 
la línea 3, columna 4, el valor 
es 16 (el valor sólo depende 
de las columnas). Al activar- 
lo es necesario memorizar, 
pues, el número 16 (conver- 
tido en cadena). En la figura 
de la página 2138 se han re- 
presentado los valores co- 
rrespondientes al sprite di- 
bujado. 

Como se ve, cada uno de los 
4 cuadrados en que se divi- 
de un sprite necesita 8 valo- 
res (uno por cada línea). 
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GENERACION DE LAS FIGURAS E INTRODUCCION TEXTOS 
Versión con sprites (C-64 y MSX) 


El desarrollo de esta rutina 
depende mucho de la 
máquina, por lo que se 
presenta para las 

dos versiones C-64 y MSX 


La introducción del texto 

prevé 5 vocablos de 10 
caracteres, cada uno 

con un flag, que puede valer 1 

si el vocablo es una 

respuesta correcta o O 

si es errónea. Esta 

introducción se efectúa mediante 
las rutinas 2000 y 3000 


Actualiza 
registro 1 


El registro 1 contiene, como 
de costumbre el número del 
último registro ocupado. 

Sin embargo, el fichero Datos 
está estructurado con una 
lección en dos o más registros 
y, por tanto, los datos están 

en los registros 2 y 3, 4 

y 5, etc. 


MX es el valor leído en el 
primer bloque (registro 1) 


Para la versión cinta, las funciones son análogas. pero se realizan enteramente en memoria, 


con transferencia al fichero sólo al final de la introducción 


GENERACION SPRITES EN MSX 


— Borra la pantalla 

— Borra el contenido de las 
variables 

- Inicializa los contadores 


O, 


En la pantalla aparece 
ampliada la retícula del sprite 
en la fase de generación (1 : 4) 
y el conjunto de la figura 


A su vez, el cursor es un 
sprite 


: 


Solo con acuerdo, si no 
se tiene la activación del 
punto 


En la pantalla aparece el sprite en 
fase de generación 
junto con los anteriores 
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La retícula contiene, ampliado, el sprite en fase de construcción 


12864 32 16 8 4 2 


TS(1) =CHR$(64) + 
CHR8(27) + 
CHRS(0) + 
CHR$(112) + 
CHRS(8) + 
CHR$(96) + 
CHRS(2) + 
CHRg$1(0) 


S$(1) 


S$(3) S$(4) 


S$(n) = T$(1) + T$(2) + 
+ T$(3) + T$(4) 


SUE 
APPEAR 
1 0 0 106 (0 8 E is ás Es 25 


Por esto es evidente la necesidad de una matriz 
intermedia, de dimensión 8, en la que recoger los 
valores numéricos a transformar, sucesivamente, 
en cadena. 

Resumiendo: 


1 / La línea y la columna de la retícula comnmciden 
con la posición física del cursor y, por tanto, 
hay que gestionar los desplazamientos con 
dos contadores, uno para la línea y otro para 
la columna 


2 /La línea identifica uno de los 8 elementos de la 
matriz auxiliar (AA(8)), mientras que la colum- 
na, el valor numérico a insertar. Por ejemplo, 
indicando con L la línea y con C la columna en 
que se encuentra el cursor, su activación pro- 
duce la memorización en el elemento AA(L) 
del valor numérico 2(C — 1). Y viceversa, si con 
el cursor en la posición L,C se pulsa la tecla 
«S» (Borra), se tiene AA(L) = 0 y el punto se 
desactiva. 


3 / Al final de uno de los 4 cuadrados que consti- 


tuyen el sprite, los 8 valores numéricos son 
convertidos en cadena en la matriz T$(1). 
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Para evitar que el usuario tenga que ordenar este 
desplazamiento, se ha previsto una matriz inter- 
media para cada una de las cadenas T$(«) y, por 
tanto, en el listado su dimensionado es AA(4,8). 
El diagrama de la página 2137 sólo es a nivel fun- 
cional, y el detalle puede obtenerse en los lista- 
dos. En particular se muestra la lógica utilizada 
para el borrado, mientras que no se ha mostrado 
la del desplazamiento. El cursor se posiciona utili- 
zando las teclas correspondientes (—, =>, ?., |), 
pero la zona no se activa si no es bajo acuerdo, O 
sea con la tecla A. Por tanto, después del bloque 
de cálculo de la nueva posición, debe insertarse 
la lectura de un carácter. Si el carácter introduci- 
do es A, se realizan las siguientes funciones. De 
otro modo se saltan. 


Actualización. Como para todos los programas 
de gestión de datos, en este caso también debe 
preverse la función de actualización, O sea de va- 
riación de valores introducidos anteriormente, por 
ejemplo para corregir errores cometidos en la in- 
troducción. El diagrama de la página 2136 no indi- 
ca, para sencillez, esta función, pero su introduc- 
ción requiere pocas modificaciones. Después de 
la generación del sprite, los datos correspondien- 


tes se transfieren al fichero en el registro MX + 1, 
o sea en el primero libre. Para activar la función 
de actualización basta con pedir al usuario qué 
registro desea escribir y así, el dato introducido 
por vídeo (sprite), en lugar de ocupar una posi- 
ción vacía (Reg. = MX + 1) vuelve a escribirse en 
el registro que contenía los valores erróneos. Para 
el texto cabe seguir un procedimiento análogo. 
Uno u otro modo de proceder se selecciona con 
un flag que indica si la función deseada es una 
Introducción o una Actualización. En el primer ca- 
so, los datos se introducen en el registro MX + 1 
y, en el segundo, el usuario debe especificar su 
posición. 

Naturalmente, este método sólo es aplicable a las 
versiones disco, o sea con ficheros de tipo ran- 
dom. Para la versión cinta (secuenciales) hay que 
cargarlo todo en memoria y después volver a es- 
cribir el fichero por completo. 


Versión en alta resolución. Para los sistemas 
DOS no hay previstos los sprites, por lo que debe 
utilizarse la alta resolución desarrollando el dibujo 
como una serie de caracteres gráficos. El diagra- 
ma de principio también es el de la página 2136, 
con la diferencia de que la subrutina Sprite se ha 
sustituido por la gestión de la pantalla gráfica. 
Una vez construido el dibujo debe leerse la me- 
moria vídeo y transferir su valor al fichero datos. 
Este procedimiento también puede utilizarse en 
un sistema MSX, con instrucciones de alto nivel 
que facilitan la gestión del vídeo en alta resolu- 
ción. Las dos variaciones son análogas y, por tan- 
to, se han omitido los diagramas. 


Modificaciones para la versión DOS. Cuando 
hay que trabajar en alta resolución, por ejemplo 
para realizar gráficos o dibujos bastante detalla- 
dos, se produce la imposibilidad de sobreponer a 
los gráficos el texto de caracteres ASCII. En el 
Apple se ha previsto el modo gráfico 1, que per- 
mite escribir cuatro líneas de texto en la parte 
baja de la pantalla. Sin embargo, en la mayor par- 
te de los casos, este sistema no es suficiente para 
resolver el problema y, por tanto, deben preparar- 
se subrutinas que permitan la presentación de 
caracteres en alta resolución. 

Los resultados a conseguir son: 24 líneas de 40 
caracteres; posibilidad de leyendas en inverso y 
gestión de un cursor parpadeante; disponibilidad 
de un juego de caracteres semigráficos predefini- 
dos; y finalmente, una alta velocidad de ejecu- 
ción. 


Construcción del carácter. En el Apple, un ca- 
rácter está constituido por una matriz de 7 «w 8 
puntos, y precisamente por esto en este modo de 
texto se tienen 24 líneas de 40 caracteres: efecti- 


vamente, 7 x 40 = 280 (resolución horizontal) y 8 
+ 24 = 192 (resolución vertical). 

Cada punto de la matriz puede encenderse o 
apagarse: asociando la condición lógica 1 al pun- 
to encendido y la condición O al punto apagado, 
por ejemplo se ve que, para formar la letra «A», 
son necesarias ocho series de 7 bits, cada una 
correspondiente a una línea de la matriz. Por tan- 
to puede decirse que, para memorizar un carác- 
ter, bastan ocho bytes, correspondientes a los va- 
lores, en binario, de la matriz a dibujar. En la pági- 
na 2140 se presenta un ejemplo con la letra A. 


Organización de la página gráfica. La página 
gráfica del Apple está formada por 8192 bytes 
(8K); un grupo de 40 bytes corresponde a una 
línea de 40 x= 7 = 280 puntos (se considera que 
un byte sólo está formado por 7 bits, porque el 
octavo no se emplea para formar la imagen). 
Cuando, utilizando la instrucción «HPLOT» del 
Basic, se enciende un punto en las coordenadas 
X,Y, la máquina calcula el byte de pantalla corres- 
pondiente a las coordenadas proporcionadas en 
la instrucción y, sucesivamente, introduce en esta 
posición un valor que depende, bien del conteni- 
do del byte seleccionado en aquel momento, 
bien del valor de la coordenada X indicada. 
Dividiendo la página gráfica en 40 columnas y 24 
líneas, si X e Y son las coordenadas donde se 
quiere que se dibuje el carácter, la fórmula que 
proporciona la posición de partida, o sea la locali- 
zación en que terminará la primera línea de la ma- 
triz de la figura, es la que está en (HGR2): 

LOC = 16255 x (Y < 9) + 16295 x (Y > 8) xe 
(Y < 17) + 16335 x (Y > 16) + (Y -8x (Y >8)-8= 
* (Y > 16))x 128 + X 
Las siguientes líneas de la matriz se posicionarán 
con paso 1024 a partir de la posición calculada. 
Hasta ahora no se ha hablado de la tabla de los 
caracteres. Sin embargo, es claro que para utili- 
zar este sistema debe cargarse en memoria una 
tabla en la que, para cada carácter, se memori- 
zan los ocho bytes necesarios para construirlo. 
Para hallar la posición del carácter en la tabla se 

tiene la fórmula: 

POS = 24575 + (CO -— 32) x 8 
Se supone que ésta está memorizada a partir de 
la posición 24576 (o sea después de la página 2 
en alta resolución) y que CO es el código ASCII 
del carácter a presentar. 
Un juego completo de caracteres está compues- 
to de 64 figuras, por lo que ocupa 64 x 8 = 512 
bytes. 
La rutina útil para la gestión de la tabla de carac- 
teres, proporcionada por las funciones de l/O, se 
utilizará en lugar de la data entry en las aplicacio- 
nes en las que se necesita la gestión simultánea 
de texto y gráficos. 
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GENERACION CARACTERES EN ALTA RESOLUCION 


| 
8.* bit no usado E 
> (1000) =(8)10 
=> (10100) =(20)10 
> (100010)2 =(34)10 
=> (100010)2 =(34)10 
> (111110)2 =(62)10 
> (100010)2 =(34)10 
> (100010)2 =(34)10 
> (0) =(0)10 


1 
2 
3 
a 
Si 
6. 
7o 
8 


Pantalla 40 x 25 
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RELACION DE VARIABLES - APPLE 


Versión con sólo texto 


BS$(+) 
LC(«) 
ND(s) 


CX(x) 
CY(x) 


DX(+) 
DY (+) 


TF(+) 


D$(+) 


VOS(+) 
BLS 
PD$ 
AS$ 
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= matriz de los buffers (1 por campo 
de introducción) 

=|longitud del campo de introduc- 
ción 

= número de decimales en el campo 
de introducción 


= coordenadas en pantalla del cam- 
po de introducción 


=coordenadas en pantalla de la 
descripción 

= matriz numérica que contiene los 
códigos ASCII de teclas de co- 
mando 

= descripciones en las máscaras ví- 
deo 

=voces del menú principal 

= blank 

= punto decimal 

= carácter “—”. Identifica los campos 
de introducción alfanuméricos 

=cCcarácter “+”. Identifica los cam- 
pos de introducción numéricos 

=número de campos de introduc- 
ción en la máscara activada 

=80 blanks 

= descripción ayuda 

= código tecla función pulsada 

= número de la máscara selecciona- 
da 

= nombre del fichero 

= longitud registro 

= número registro 

= buffer del disco 

= índice de lección 

=número lecciones a modificar en 
actualización 

=emite un bip [CHR$(7)] 

=unidad seleccionada (1 o 2) 

= nombre usuario (introducido por el 
preparador durante el uso) 

= nombre usuario extraído del regis- 
tro durante la búsqueda 


Versión con los gráficos 


BPS = CHR$(7) [emite un bip] 
D$ =CHR$(4) [para la comunicación 
con el disco] 
BAS$ =80 blanks 
DR$ = drive seleccionado ( 1 o 2) 
GT =juego de caracteres usado (0, 1, 
2,3, 4) 
= Usada para mensajes en vídeo 
= buffer de entrada tecla 
= Código de la tecla pulsada 
= nombre del fichero 
= longitud registro 
=número registro 
= apunta al principio del dibujo en el 
interior del fichero 
= buffer del disco 
=número lecciones menos 1 (gene- 
ración) 
= último registro escrito 
= buffer de entrada campo 
=tiempo de parpadeo del cursor 
=coordenada X de posicionado 
cursor 
=coordenada Y de posicionado 
cursor 


=Códigos caracteres del dibujo en 


cc 
hi-res 


(10,10) 


url =Códigos juego caracteres del di- 
id bujo 

N$ =nombre del usuario (introducido 
por el preparador) 

R$ = nombre usuario extraído del regis- 
tro durante la búsqueda 

NL = número registro en que se ha en- 
contrado el nombre usuario 
(R$ = N$) 


En esta versión no se ha utilizado la data entry normal. 
Para las variables que se refieren al uso de los caracteres 
y de los gráficos, consultar los listados anteriores. 


Menú generación texto. En la versión DOS, la creación 
de los archivos que contienen las lecciones de 
ortografía con sólo texto es realizada por el primero de 
los cuatro programas previstos. La voz 2, Corrección 
datos, permite realizar modificaciones a lecciones 
introducidas anteriormente; las voces 3 y 4, 
Introducción y Corrección texto, permiten crear y variar 
el texto de introducción que podrá guiar al niño durante 
el desarrollo de las lecciones. 


Generación. La fase de Generación de los archivos de 

datos se realiza en tres partes: 

1/ Creación de los ficheros datos en el diskette 

2/ Introducción de los nombres de los 5 niños a los que 
se ha reservado el soporte magnético 

3/ Introducción de las lecciones 

En la última parte, Introducción lecciones, se insertan 

los cuestionarios, cada uno de los cuales está formado 

por 10 vocablos con otros tantos indicadores. Los 

valores de los indicadores son: 

1: indica los vocablos correctos o, en general, la 
condición de verdad. 

O: indica los vocablos erróneos 

1 a10: valores utilizados para las asociaciones entre los 
10 vocablos previstos. 


Introducción lecciones con gráficos. El programa de 

generación con gráficos permite crear preguntas 

ilustradas con figuras. En la versión DOS, estas figuras 

se generan mediante caracteres y símbolos 

semigráficos en alta resolución en una retícula del 

formato 10x10 caracteres. Los comandos de que 

dispone el usuario en la generación de las figuras son: 

CTRL + Z: mueve el cursor arriba 

CTRL + W. mueve el cursor abajo 

CTRL + A: mueve el cursor a la izquierda 

CTRL + S: mueve el cursor a la derecha 

RETURN : activa el símbolo gráfico seleccionado en la 
posición en que se encuentra el cursor 

Barra espaciadora: selecciona el juego de caracteres 

“- | desplazan todos los caracteres y símbolos 

= | disponibles en el juego seleccionado 


CTRL + E: introduce la figura en disco. 


Desarrollo lecciones con gráficos. El cuarto programa 
de Ortografía permite al niño desarrollar las lecciones 
ilustradas con las figuras. En esta fase, el niño 
interrogado debe indicar cuál de los 5 vocablos 
previstos en la generación corresponde a la figura 
presentada (se han previsto generaciones visibles y 
sonoras según el resultado positivo o no de la 
respuesta). 

Ambos programas dedicados a las lecciones con 
gráficos (Generación y Uso) trabajan con pantalla de 
alta resolución. 


Si OTE TONES EOS 


EDICIONES FORUMS 
<TEXTO> 


LECCION M 1 


VOCABLO INDICADOR 


A 


JATO 
CA: 


ÑO! 
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Menú generación texto. También en la versión MSX, 
que adopta como soporte para la memorización la cinta 
magnética, el procedimiento Ortografía está dividido en 
cuatro programas: 

1/ Generación lecciones con sólo texto 

2/ Desarrollo lecciones con sólo texto 

3/ Generación lecciones con gráficos 

4/ Desarrollo lecciones con gráficos. 

En este caso, el usuario ha activado el primer programa, 
que tiene un menú principal con el que seleccionar la 
función deseada. Las voces 1 y 2 permiten grabar y 
modificar las lecciones, con las cuales también puede 
introducirse un texto explicativo (cuya gestión se realiza 
en las voces 3 y 4). 


Introducción lecciones con sólo texto. El usuario ha 
seleccionado la voz 1 del menú, y el programa presenta 
la máscara vídeo necesaria para la introducción de las 
partes que constituyen una lección: tema general, diez 
vocablos, diez indicadores. 

Los valores a insertar en los campos de introducción de 
los indicadores servirán para identificar la condición de 
verdad (número 1) o la de falsedad (número 0) de un 
vocablo. Los valores comprendidos entre 1 y 10 se 
utilizarán para las asociaciones entre los diez vocablos 
presentes. 


Programa con gráficos: introducción de las figuras. 
Las lecciones que prevén el uso de dibujos ilustrativos 
están compuestas de una parte gráfica y otra de texto. 
Por tanto, la introducción de estas lecciones se ha 
dividido en dos fases: en la primera se crea la figura 
(que en los programas MSX está constituida por 4 
sprites) y después se introducen los cinco nombres 
entre los que está la respuesta correcta. 

En la foto se ha presentado la máscara vídeo 
correspondiente a la creación de la figura. Los 
comandos previstos son: 

1 : mueve el cursor arriba 

: mueve el cursor abajo 

: mueve el cursor a la izquierda 

: mueve el cursor a la derecha 

: enciende el punto en el que se encuentra el cursor 
: apaga el punto en el que se encuentra el cursor 

: confirma la figura. 


Desarrollo lecciones con gráficos. El programa que 
desarrolla las lecciones compendiadas por los dibujos 
es el que más atraerá la atención del niño, gracias al 
uso del sonido y, aunque en una mínima parte, a la 
animación de los sprites. 

La primera pantalla que aparece recuerda al usuario 
que debe posicionar la cinta que contiene los datos de 
las lecciones. La particularidad de este programa 
consiste en la utilización de la pantalla en alta 
resolución, elección que permite la presentación de 
leyendas en colores y de dibujos. 
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E.6.S. Ediciones Forum, 


ORTOGRAFIA “seneracion> 


4 -Introduccion nuevos datos 
2 -Correccion datos 
-> 3 -Introduccion texto explicacion 
4 -Correccion texto 
9 -—Fin de tarea 


E.G.S. Ediciones Forum, S.A. 


Introduccion nuevos datos 


LECCION nm. 1 
Vocablo Flag 


Ballena 
Tortuga 
on 


e 
iratfa 


CTRL Y <AYUDA> 


Rebobina la cinta datos 
u aprieta PLAY 


. 


Si estas erepacpdo pulsa una 
cla 


La foto se refiere al segundo paso del programa. El 
usuario ha introducido la cinta de datos y se han leído 
todas las lecciones grabadas previamente. En este ———— 
punto, el programa indica el nombre (y por tanto el niño) E-6- Ediciones Fo 

para el que se ha reservado la cinta datos y espera la j CREÓ 
confirmación para continuar. , pes 

El nombre del niño, en el caso de la foto “LUIS”, se ; TOR cCaszette ocontieney 
introdujo junto con las lecciones en la fase de 
generación. 


las lecciones de: 


LUIS 


Introducción respuestas. El niño está ahora 
desarrollando los cuestionarios que le presenta el 
programa. En la parte alta de la pantalla hay la figura y, 
debajo, los cinco nombres entre los cuales deberá 
identificar la respuesta correcta. El niño interrogado 
deberá utilizar la letra “S” para indicar la respuesta que 
considere correcta y la letra "N” para las respuestas 
erróneas. 


rd E 
a » rs 


Comprobación de las respuestas. Las respuestas 
introducidas por el niño se convalidan con la tecla F5 y 
el programa pasa a analizar la introducción. 

Dicha introducción se compara con los valores 
introducidos en la fase de generación (1 equivale a la 
letra “S” y O a la letra “N”), y sólo en el caso de absoluta 
correspondencia, el programa indicará el resultado 
positivo de las respuestas, como en la foto. El mensaje 
de error o de lección superada va acompañado de 
señalizaciones sonoras y de la descomposición de la 
figura para atraer la atención del niño sobre sus 
respuestas. 


CUEVA 


TIENDA 


Fin desarrollo lecciones. Lo mismo para el programa 
de desarrollo de lecciones con texto como para el de 
desarrollo de lecciones con gráficos, se ha previsto la 
actualización de los ficheros al final de su utilización. 
Esta actualización se efectúa incrementando el 
indicador numérico correspondiente a la lección 
superada por el niño tantas veces como se hayan 
resuelto correctamente los cuestionarios. Para ello es 
necesario grabar de nuevo en la cassette datos los 
ficheros modificados. 
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Extensiones y modificaciones 


La modificación más inmediata consiste en la activa- 
ción de la lógica con vocablos enmascarados. 

El procedimiento, en la forma representada en los lista- 
dos, prevé la presentación de todos los vocablos y, 
por tanto, el desarrollo se reduce a indicar cuáles son 
correctos y cuáles deben asociarse entre sí, aunque 
siempre teniéndolos presentados. 

Utilizando oportunamente el flag puede activarse la ló- 
gica con vocablos «enmascarados». 

Las implantaciones que deben aportarse a los progra- 
mas son: 


1 /Condicionar la impresión en pantalla al valor del 
flag (debe ser inferior a 10) 

2 / Utilizar, como puntero, sólo la parte interna del flag. 
Es decir, si el flag es superior a 10, sólo debe ex- 
traerse el carácter de la derecha. 


De esta manera, los vocablos no se presentan, pero 
deben ser escritos por el niño, aumentando así nota- 
blemente la dificultad del test. 

Una posterior implantación consiste en tener en cuen- 
ta el número de intentos realizados antes de la res- 
puesta correcta. La estructura del procedimiento no 
prevé el control sobre el número de respuestas, lo cual 
significa que un test puede superarse también con in- 
tentos. En cambio, incluyendo el contado de las intro- 
ducciones y de las respuestas correctas, se tendrá 
una medida del grado de preparación. 

La implantación es muy sencilla, puesto que sólo se 
trata de incrementar dos contadores: el primero con 
cada introducción y, el segundo, con cada error. 

Al salir del programa, al final de las preguntas, los dos 
contadores pueden presentarse en pantalla y, even- 
tualmente, pueden transferirse al fichero usuarios para 
una comprobación a posteriori. En este caso habrá 
que modificar el formato registro de dicho fichero e 
incluir una rutina o un programa propiamente dicho, 
para su presentación. 

Esta lógica de control sobre el número de respuestas 
puede verse con detalle en el procedimiento Geogra- 
fía. Finalmente, una implantación muy importante en 
los programas didácticos orientados a los niños, con- 
siste en la inclusión de una gestión «musical» que 
ponga de manifiesto los errores o apruebe las res- 
puestas correctas de manera divertida. A continuación 
se tratará este tema de manera detallada. 


Módulo musical 


En todos los programas, cuando se produce un error, 
hay que emitir un sonido que llame la atención del 
operador. 

En las aplicaciones profesionales u orientadas a un 
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usuario adulto, la señal puede ser un simple «beep», 
mientras que en los programas destinados a un uso 
didáctico orientado a los niños, es necesario «animar» 
su desarrollo utilizando «músicas». 

Este programa permite la preparación y la memoriza- 
ción de composiciones musicales, en disco o cinta, en 
las que también se han previsto las funciones de escu- 
cha y modificación. 

El módulo está completado con una subrutina (35000), 
que permite solamente la escucha en todas las aplica- 
ciones en las que se desee un soporte musical. 

El empleo del módulo es el siguiente: 

Con el programa principal, descrito más adelante, se 
crea la composición, que se memoriza en un fichero. 
En los programas de aplicación, basta con incluir la 
subrutina 35000, llamándola cuando interesa y des- 
pués de haber implantado en la variable A$ el nombre 
del fichero a utilizar. Por ejemplo, supóngase que se 
han generado dos ficheros: el primero contiene el 
«motivo» que debe sonar en caso de respuesta acer- 
tada, de nombre FL1, y el segundo, de nombre FL2, 
para las respuestas erróneas. Para obtener la ejecu- 
ción de uno o del otro, son suficientes las instrucciones 


A$ = “FL1”: GOSUB 35000 
O bien 
A$ = “FL2”: GOSUB 35000 


Naturalmente, la subrutina 35000 debe estar incluida 
en el programa que la utiliza. 

Finalmente, hay que observar que con esta parametri- 
zación, el número de motivos que puede emplearse 
sólo está limitado por el espacio en el disco o en la 
cinta y, por tanto, puede preverse un número muy ele- 
vado de ellos. 

Como ya se ha indicado, el empleo de «música» en 
los programas de aplicación (mediante la subrutina 
35000) requiere la generación de ficheros que conten- 
gan las notas que deben «sonar». La preparación de 
estos ficheros (generación) debe realizarse con un 
programa propiamente dicho, cuyo diagrama se ha re- 
presentado en las cuatro páginas siguientes. 

Las funciones previstas en el diagrama se activan me- 
diante teclas tuncionales o combinaciones de caracte- 
res (en función del tipo de máquina utilizada). En la 
página 2161 se ha representado el diagrama de la su- 
brutina (5000) que activa la función seleccionada. 
Los diagramas corresponden a la versión MSX. Para 
las demás deben consultarse los listados. 

En particular, en la versión DOS se tienen notables di- 
ferencias, puesto que no se dispone de sprites ni de 
instrucciones para emitir notas. 


MODULO MUSICAL: PARTE 1 


Con las teclas funcionales 
pueden modificarse las 
características de las notas 
emitidas 


O 


Desplaza hacia delante las 
notas introducidas 


O) 
qe 


e] 


Esta subrutina carga de 
cinta o de disco los datos de 
una composición hecha 
previamente y memorizada 


Presenta el dibujo del 
teclado 


La tecla pulsada 
(correspondiente a una nota) 
se evidencia superponiendo 
un sprite al dibujo del teclado. 
Este bloque define los sprites 
previstos 


El programa se pone en 
espera de una tecla 


Las flechas (derecha: > e 
izquierda: —) sirven para 
desplazar las notas ya 
introducidas para volverlas a 
escuchar o, eventualmente, 
para variarlas 


Si 
Desplazan hacia atrás las 
| notas introducidas 


El desarrollo de este bloque 
depende de la versión 
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MODULO MUSICAL: PARTE 2 


ON AA(TT,1) GOSUB El número del sprite 
correspondiente está 
en AA(TT,1) 
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ACTIVACION FUNCIONES 


Con el bucle de 1 a 20 
cambia el valor de la octava 
que hay en N$(«, 1) 


oz y 


Memoriza una pausa en Permite la memorización Con un bucle de 1 a KR 


MS$(CR) en MS$(CR) o no de las permite volver a escuchar 
notas pulsadas MS$(+) 
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SUBRUTINA PARA VOLVER A ESCUCHAR DE CINTA 


En la llamada hay que transferir 
a la variable A$ el nombre del 
fichero que contiene las notas 
a «hacer sonar» 


Cada elemento de M$(«) 
contiene la nota, la octava 


y la duración 


PANA 
|, 
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En M hay el número de notas 
grabadas 


En M$(+) se cargan las notas 
que hay en la cinta 


En el BASIC MSX se emplea 
la instrucción PLAY MS(1) 


Aritmética 


El programa en la versión presentada está orientado a 
los más pequeños: su desarrollo es muy sencillo y no 
requiere ninguna participación por parte de los pa- 
dres, sino sólo una ayuda inicial ilustrativa. 

La máquina propone un número, diferente cada vez, e 
invita al niño a descomponerlo en unidades, decenas, 
centenas y millares. Si todas las respuestas son co- 
rrectas, la descomposición del número se ilustra con 
un dibujo en el que cada cifra está representada por 
un «cesto». El valor numérico de una cifra viene dado 
por la cantidad de bolas que están representadas en 
el cesto correspondiente. 

De esta manera, sin presentar el aspecto riguroso de 
la materia, se ilustran los conceptos básicos de un sis- 
tema de numeración posicional. 

La diferencia, por ejemplo, entre las unidades y las de- 
cenas queda evidenciada con un mecanismo anima- 
do que muestra cómo 10 bolas del primer cesto (uni- 
dades) deben convertirse en sólo un 1 en el segundo 
(decenas). 

Para completar el ejercicio, el niño es invitado a partici- 
par activamente indicando, según desee, cantidades 
que deben añadirse a uno cualquiera de los cestos. 
Para esta función se produce el acarreo, o sea la tras- 
lación de una bola de un cesto a otro, lo cual ilustra 
gráficamente los conceptos de «posición» y de «base 
de numeración». 

Al mismo tiempo, en la pantalla aparece el desarrollo 
de la operación en símbolos matemáticos (o sea nú- 
meros), poniendo claramente de manifiesto la relación 
que hay entre la simbología numérica y la cantidad 
que representa. 


Uso del programa 


Aritmética 

Este programa no es parametrizado y, por tanto, no 
contiene un menú ni los usuales procedimientos de 
generación del sistema y de introducción de pregun- 
tas. Las funciones que desarrolla son dos, una des- 
pués de la otra. 

Inicialmente muestra cómo un número de 4 cifras está 
compuesto de unidades, decenas, centenas y milla- 
res. A continuación propone al niño que indique algu- 
nas sumas para realizar, indicando su lógica con sím- 
bolos gráficos. 

Al activar el programa se presenta una máscara en la 
que hay representados cuatro cestos, cada uno con 
un «peso» referido al sistema de numeración decimal. 
El primer cesto corresponde a las unidades, el segun- 
do a las decenas, y así sucesivamente. En este mo- 


Es decir, el «número» ya no aparece como una abs- 
tracción casi carente de significado, sino pertecta- 
mente relacionada con objetos físicos. En el procedi- 
miento se ha incluido también un programa de Geo- 
metría. Esta aplicación, más compleja que la anterior, 
permite comprobar los conocimientos de fórmulas de 
geometría y la capacidad de desarrollar cálculos tam- 
bién complejos. 

El desarrollo consiste en la presentación de una figura 
geométrica y en la petición al niño de que calcule las 
magnitudes, como por ejemplo el área o el perímetro. 
La máquina analiza las respuestas y corrige los even- 
tuales errores. 

La finalidad del programa, 'además de ser la de com- 
probación de la preparación en la materia, también es 
la de habituar al niño a la realización de cálculos men- 
tales rápidos. Efectivamente, la solución a la pregunta 
debe darse en forma de valor numérico, resultante del 
cálculo de los datos generados por el ordenador. 

El valor introducido debe compararse con el calculado 
por el programa. Por tanto, el usuario, además de utili- 
zar la fórmula correcta, debe realizar el correspondien- 
te cálculo sin errores. 

Si la respuesta no es correcta, el niño puede pedir al 
ordenador que le muestre la fórmula, corrigiendo así 
su error. 

El programa, completamente configurable, también 
puede utilizarse como prontuario de geometría. Natu- 
ralmente, para este tipo de empleo conviene implantar 
una versión sin la parte gráfica que, si bien es sugesti- 
va, requiere mucho tiempo para la generación y no es 
indispensable para esta aplicación. 


mento, el programa genera un número aleatorio (de 4 
cifras). De este número se extrae una cifra cada vez a 
partir de la derecha. Por ejemplo, si el número es 
7953, la primera cifra extraída es el 3, que representa 
las unidades del número generado. 

Después de aislar este valor, el programa pide al niño 
que indique cuántas son las unidades que hay en el 
número, y la respuesta se compara con el valor ante- 
rior. Si existe igualdad, el valor introducido por el niño 
es correcto y la máscara se completa haciendo apare- 
cer en el interior del cesto correspondiente un número 
de símbolos igual al valor introducido. En caso contra- 
rio, el programa indica el error y busca si entre todas 
las cifras aparece la introducida. De esta manera, se 
tienen dos posibilidades: 
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1 / la cifra no pertenece al número y, en este caso, el 
programa avisa que el valor no existe 

2 /la cifra está en el número, pero corresponde a otra 
posición. 


Por ejemplo, si la primera cifra es 3 y la pregunta aso- 
ciada es «¿Cuántas unidades?», si se contesta 9, el 
programa busca este símbolo entre los que compo- 
nen el número e indica el error de atribución, especifi- 
cando que el valor introducido corresponde precisa- 
mente a las centenas. 

Si se responde correctamente, además de la aparición 
de los símbolos en los cestos, se tiene la presentación 
del valor en la línea de descomposición en la que se 
indican los pesos de cada cifra (1, 10, 100, 1000), ob- 
teniendo así la descomposición del número también 
en símbolos aritméticos además de gráficos. 

El programa también contiene una forma de parametri- 
zación, aunque no puede utilizarse desde el exterior. 
En particular, el ejemplo presentado corresponde al 
sistema decimal, pero, con algunas modificaciones, es 
posible utilizar otros sistemas de numeración (siempre 
posicionales). 

Además, el programa permite realizar sumas, guiando 
al usuario con preguntas y señalizaciones de error. 


Geometría 
El programa, mediante la gestión de un archivo, permi- 
te realizar dos funciones principales: 


m Consultas 
"= Comprobación del conocimiento del tema 


Utilizado para consultas, constituye un prontuario de 
las fórmulas de geometría, mientras que la segunda 
modalidad es para el uso didáctico. Los dos modos se 
basan en la misma lógica y utilizan los mismos fiche- 
ros. La única diferencia consiste en la presentación o 
no de las fórmulas contenidas en ellos. 

Cada figura geométrica está identificada por un dibujo 
que la representa y por un nombre. Se memorizan por 
separado algunos parámetros característicos de la fi- 
gura (para un máximo de 4) y dos fórmulas de cálculo 
(generalmente área y perímetro). Por ejemplo, para el 
triángulo, además de la figura, se memorizan el nom- 
bre (TRIANGULO) y los parámetros característicos, o 
sea BASE, ALTURA y dos LADOS. 

Como fórmulas se tendrán: 


PERIMETRO = suma de los lados 
AREA = BASE x ALTURA/2. 


La utilización como prontuario se reduce a la presenta- 
ción de los datos, o sea: dibujo, nombre y fórmulas. Y 
viceversa, para uso didáctico sólo aparecen la figura, 
los parámetros y la petición de calcular el área y el 
perímetro. 

En la máscara vídeo inicial (de la fase didáctica) apa- 
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recen la figura geométrica seleccionada y el nombre; 
introduciendo un carácter cualquiera se pasa a la si- 
guiente máscara, en la que se presentan las pregun- 
tas. Esta lógica de separación entre dibujo y texto sólo 
es indicativa, y en algunas versiones en las que el di- 
bujo se realiza con sprites, las dos máscaras están 
unificadas. 

En la segunda máscara (o en la segunda parte de la 
máscara única) aparecen las descripciones de los pa- 
rámetros asociados a la figura (por ejemplo, para el 
triángulo: base, altura, lado 1, lado 2) y las dos pregun- 
tas correspondientes. 

Para cada uno de los parámetros, el programa genera 
un número aleatorio y pide respuesta a las preguntas 
utilizando los valores presentados para los cálculos. 
En el ejemplo (triángulo), las dos preguntas son la peti- 
ción del perímetro y del área. El usuario debe introdu- 
cir dichos valores después de haberlos calculado en 
base a los asociados en los parámetros. 

Esta lógica es más elástica, puesto que permite es- 
tructurar las preguntas de la manera deseada, pero en 
cambio requiere un mínimo de atención tanto en la 
preparación de los datos de base como en su empleo. 
En la fase de generación del archivo es necesario utili- 
zar, como parámetros, únicamente las magnitudes 
que no puedan dar lugar a ambigúedades o a resulta- 
dos inexactos. 

Por ejemplo, siempre en el triángulo, si se han definido 
como parámetros los tres lados (base, lado 1, lado 2), 
puede acontencer que los valores asociados al azar 
no puedan ser reales. 

Por ejemplo, los valores: base = 6, lado 1 = 2, lado 2 
= 11, son imposibles geométricamente, puesto que 
cada lado debe ser menor que la suma de los otros 
dos. Sin embargo, estas incongruencias no limitan la 
aplicabilidad del programa porque, incluso con valo- 
res erróneos geométricamente, puede comprobarse la 
corrección de las respuestas. Es decir, con los datos 
anteriores, se tendría: área = 6 x 4/2 = 12 y perímetro 
= 19. Introduciendo como respuestas 12 y 19, el pro- 
grama las aceptaría como válidas, porque al aplicar 
las fórmulas memorizadas, los resultados coincidirían. 
Como ya se ha indicado anteriormente, este programa 
requiere la introducción de los datos de base por parte 
del usuario. 

Cada figura comprende un conjunto de datos ubica- 
dos en ficheros diferentes, y está identificada tanto por 
el número progresivo de introducción como por el 
nombre. De esta manera puede llamarse bien con el 
número, bien con el nombre. Esta doble clave de en- 
trada es útil tanto para rectificar eventuales errores de 
entrada como para tener una especie de Índice. Efec- 
tivamente, estructurando el conjunto de datos con un 
número progresivo, cada número puede identificarse 
con el de la lección y obtener así un verdadero curso 
de geometría, incluso de nivel muy sencillo. Sin em- 
bargo, para obtener esta finalidad es necesario orde- 
nar cuidadosamente los datos antes de su introduc- 


ción para impedir que los diversos temas se mezclen 
sin ninguna lógica. Es posible introducir las diferentes 
figuras en orden creciente de dificultad, como por 
ejemplo en primer lugar los triángulos, después los 
cuadriláteros, el círculo, etc. Además, también debe 
prestarse especial atención en la fase de introducción 
de las fórmulas. 

El programa utiliza las indicaciones aportadas en esta 
fase para realizar el cálculo necesario y comprobar las 
respuestas, por lo que estas fórmulas deben ser para- 
metrizadas. 

Por ejemplo, y siempre para el triángulo, los paráme- 
tros son base, altura, lado 1, lado 2 que, introducidos 
en la línea «parámetros», se asocian a un número pro- 
gresivo (1, 2, 3, 4) y las fórmulas deberán escribirse 
utilizando estos indicadores. Por ejemplo, el perímetro 
se indica con 1 + 3 + 4, porque introduciendo los 
parámetros en el orden anterior, la base ocupa la posi- 
ción 1 y los otros dos lados las posiciones 3 y 4. 

Las fórmulas se introducen en las dos líneas que hay 
debajo de CALCULO; en los dos campos (uno por fór- 
mula) aparece el símbolo «X» que separa, en cada 
uno, la primera parte que sólo tiene carácter numérico 
de la segunda (últimos 7 caracteres) que contiene la 
fórmula sintetizada para los punteros (1 + 3 + 4). 
Esta separación es necesaria para la introducción de 
constantes numéricas. Por ejemplo, el cálculo del área 
es: 1/2 X base X altura, o sea 0,5 X base X altura (1/2 = 
0,5) y la fórmula, en términos de punteros, es: 0.5X 1 X 
2; o sea que contiene todos los valores numéricos pe- 
ro con significados muy diferentes. El primero (0.5) es 
un valor multiplicador, y los otros dos (1, 2) indican que 
en el desarrollo del cálculo deben utilizarse los conte- 
nidos de los campos 1 (base) y 2 (altura). 

Para gestionar en el programa estas diferencias es ne- 
cesario estructurar cada fórmula en dos partes. La pri- 
mera, a la izquierda del símbolo «X», debe contener 
siempre el valor multiplicador; la segunda, a la dere- 
cha del símbolo «X», es la indicación del proceso a 
realizar. La presencia del factor multiplicador obliga a 
escribir siempre un valor numérico, incluso si éste no 


Menú principal del procedimiento. Los dos temas, 
Aritmética y Geometría, se tratan de diferente manera: 
en el primero, el desarrollo ya está configurado y, por 
tanto, sólo se ha previsto el programa de uso; en 
cambio, en el segundo son necesarias las dos voces, 
Generación y Uso. 


es necesario. Por ejemplo, en el cálculo del perímetro 
(1 + 3 + 4) no se necesita ninguna constante, pero tal 
y como está estructurado el programa, debe introdu- 
cirse el valor 1. Por tanto, la fórmula a escribir es 1 X 1 
+3+4. 

Obsérvese que, algebraicamente, la expresión escrita 
es errónea, porque por motivos de prioridad en el de- 
sarrollo de las operaciones, primero debería hacerse 
la multiplicación 1 X 1 [o mejor 1 X (valor correspon- 
diente al parámetro 1)] y después las sumas. En reali- 
dad, la lógica del programa realiza en primer lugar lo 
que hay a la derecha del símbolo «X» y después el 
producto. Por tanto, la expresión debe entenderse co- 
mo escrita 1 X (1 + 3 + 4), incluso si por motivos de 
simplificación no se han previsto los paréntesis. 
Otros motivos análogos implican la necesidad de indi- 
car siempre un valor multiplicador que, si no es nece- 
sario, deberá ser 1. 

La necesidad por parte del usuario de acceder a los 
archivos implica la presencia de un menú en el que 
seleccionar la función deseada. Las funciones que 
pueden seleccionarse son las siguientes: 


m Generación del sistema 
m Introducción/variación de datos 
m Uso 


La primera es la acostumbrada preparación de los fi- 
cheros, con registros en blanco, con el único objeto de 
generar una estructura de datos seguida. La segunda 
voz permite introducir o variar, bien la figura (general- 
mente obtenida con un sprite), bien el texto (nombre, 
parámetros, o fórmulas). La última voz se refiere al de- 
sarrollo propiamente dicho, con presentación de las 
preguntas y comprobación de las respuestas. 

Los listados representados prevén el menú en la forma 
anterior, pero pueden dividirse fácilmente en dos par- 
tes: la primera con la generación y la introducción utili- 
zadas por quien genera las preguntas y la segunda, 
con un solo uso, accesible al niño que debe dar las 
respuestas. 
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Aritmética. El programa ha generado el número 1478 

y pide su descomposición cifra por cifra. Si la respuesta 
es correcta, en el cesto indicado coloca un número de 
símbolos igual al valor de la cifra seleccionada. 


COMPOM EL MUMERO 1478 


Finalizada la descomposición, el programa pasa a 
presentar el desarrollo de una suma. El primer 
parámetro a introducir es el valor numérico que se 


desea sumar. z E SAA 
COMPOM EL MUMERO 1478 


A este valor debe atribuírsele un “peso” que 
determinará su colocación en el cesto 
correspondiente. AR 


COMPOM. EL 


Al valor.introducido anteriormente (5) se le ha atribuido 
el peso “decenas” (por lo que el valor se convierte en 
50), y el número así ponderado se ha sumado al anterior. 
La operación siempre se presenta con símbolos (bolas) 
y con números. Al final de la máscara se pregunta si se 
desea continuar. 


OTRO MUMERO (s/n) 
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Respondiendo “s” a la pregunta anterior se presenta un 
nuevo número (2701). El flujo siempre es el mismo: el 
usuario introduce un valor e indica la intención de 
sumarlo al cesto de las centenas. 


14: A lares) iCentenas) 


Antes de proceder a la suma indicada, el programa se EN mo 
pregunta a qué cesto corresponde (centenas, ver foto rzos ar UE Ediciones Forum, S.fM. 
anterior). En este caso, el usuario lo ha identificado ARITMETICA 
erróneamente con el número 1, que corresponde a las 2 z Y , 
unidades. 


El programa detecta el error y lo indica. 


Geometría: menú principal. La función que debe 
activarse en primer lugar es la Generación del sistema. 
Sólo así puede pasarse a la fase de introducción de las 
preguntas. 
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Generación del sistema. Al activar la Generación del 
sistema, el programa pide la confirmación antes de 6.S diciones Forum, : 
realizar la función para evitar la posible destrucción de - el sistema 
datos ya existentes en el diskette. AA A A 


GENERACION EN CURSO 


CONTINUO 


Introducción /Variación. Al final de la Generación 
puede pasarse a la segunda voz del menú principal, 
que prevé las opciones Introducción y Variación, 
realizadas mediante dos subrutinas separadas. 
Como de costumbre, la selección se efectúa 
introduciendo el valor numérico correspondiente a la 
función deseada. <1> INTRODUCCION 


YARIACION 


VUELVE Al MENU PR: 


o 


Ediciones Forum, 


¡Introduccion/Variacion) 


INTRODUCIR. OPCION 


Introducción. La foto muestra la introducción del texto 
correspondiente a la figura n. 1 (indicada en la parte 
superior de la pantalla). El usuario introduce el nombre 
de la figura en base al cual se realizará la búsqueda 
durante el programa de utilización, y la fórmula para el 
cálculo del valor pedido en la pregunta. 


Terminada la Introducción, puede seleccionarse la 
Variación, con eventuales correcciones, o simplemente 
para obtener la lista de los nombres introducidos. 


INTRODUCIR OPCION 


<(1> INTRODUCCION 
(27 VARIACION 
(3> VUELVE AL MENU PRINCIPAL 


1STA DE MOMBRES 
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Contestando “si” a la pregunta anterior se obtiene la 
presentación de las figuras que hay. El programa pide LISTA DE LOS MOMBRES IMSERTADOS - 
cuál se desea variar. : > 


Varlación. El usuario ha introducido el valor 2, por lo 
que el procedimiento entra en la subrutina de 
actualización: en el disco lee los datos contenidos en la 
posición 2 y los presenta en pantalla en espera de las 
correcciones. 

' UNA NE hy 


DOBOD1x1 14344 


¡[000.Sx1A2 


Geometría: uso. La foto muestra el otro método de 
acceso. En el anterior, la selección de los datos a 
modificar se obtenía indicando el número progresivo 
pero, como alternativa, puede introducirse el nombre 
(cuadrado, triángulo, etc.). Para activar este segundo 
bli es necesario responder con — 1 a la petición L MUMERO CORRESPOMDIENTE 
anterior. : - PAE 


Por ejemplo, introduciendo el nombre rectángulo, el 
programa realiza una búsqueda por los datos : : | 
contenidos en el fichero y extrae los que coinciden con LALO | 
este valor. == 


son :) 
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Primera fase del análisis de las respuestas: la primera 
respuesta es correcta (perímetro). 


Segunda fase del análisis de las respuestas: la 
respuesta a la segunda pregunta es errónea (el área 
vale 20). 


La presencia del error genera la posibilidad de 
presentar la fórmula. 


El usuario ha contestado “s” a la pregunta de 
presentación de la fórmula, que se presenta. 
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RESPUES TAPRIICORRELTA! 


Rectangulo [E] 


Los valores conocidos son : 
*"1ladoi . =4 


lado2 


Perimetro 
area 


TABRISERRONEA 
Rectangulo 
Los yalores co 


ladoi 
o 
lado2- 


perimetro 
area 


Quiere ver la formula (s/n) 
Rectangulo 


Los valores conocido 


perimetro 
area 


Rectangulo 


La formula para calcular 
area 


es: 1x ladol Xx lado2 


“una tecla para continuar «4 
= á Ex _ 


AA MATIAS A | 
La lógica del programa 


Aritmética 

El análisis, desde el punto de vista lógico, es muy sen- 
cillo y corto. No existen ficheros que gestionar y, por 
tanto, la estructura de los programas es completamen- 
te diferente a la usual. Las funciones a desarrollar pue- 
den resumirse en pocas voces, elementales desde el 
punto de vista del análisis, pero bastante complejas 
para su detallado. Además, a causa de la característi- 
ca básicamente gráfica del programa, no es posible 
presentar diagramas de detalle que tengan una vali- 
dez general. Cada versión está estructurada para utili- 
zar las características y las posibilidades de la máqui- 
na que la albergará y, por tanto, está estrechamente 
ligada al hardware. 

A nivel lógico, las funciones a realizar son: 


"m Presentación máscara con cestos vacíos 

"= Generación y presentación del número de 4 cifras 

= Bucle, de 1 a 4, de extracción de cada cifra del 
número 

m Presentación de la pregunta (las preguntas están 
memorizadas en la matriz D$(+)) 

= Comprobación de la respuesta 

m Completado de la máscara con la aparición de los 
símbolos en el interior de los cestos correspondien- 
tes a las cifras 


En lo que respecta a la segunda parte (sumas), las 
funciones son: 


m Petición del número a sumar (valor) y de su peso 
(unidades, decenas, etc.) 

m Completado de la máscara con presentación, en el 
cesto indicado, de un número de símbolos igual al 
indicado e igual al total, con la eventual transferen- 
cia del acarreo al siguiente cesto. 


Esta última función es la única que requiere una cierta 
lógica, puesto que las otras son exclusivamente gráfi- 
cas. 

Realizando la suma entre el número anterior y el intro- 
ducido puede producirse el caso de superación de la 
base. Por ejemplo, si se pide sumar 9 unidades al nú- 
mero 7953, en el cesto correspondiente (unidades) 
deberán aparecer 2 símbolos, y al de las decenas de- 
berá añadirse 1 (9 + 3 = 12). Por tanto, debe preverse 
la posibilidad de un acarreo de un cesto al siguiente, y 
si existe acarreo, es necesario realizar un bucle desde 
el cesto examinado hasta el último (para tener en 
cuenta posibles acarreos sucesivos). Como ya se ha 
indicado, la parametrización de la base puede efec- 
tuarse en esta fase. El ejemplo se ha realizado utilizan- 
do el sistema de numeración decimal, lo que significa 
que si se tiene un acarreo cuando la suma de los sím- 


bolos en un cesto supera el valor 9 (la base es 10), 
variando este valor puede cambiarse la base. Por 
ejemplo, utilizando el sistema binario, el acarreo debe- 
rá producirse cuando la suma sea superior a 1. 

Sin embargo, hay que tener en cuenta que esta modifi- 
cación implica una forma diferente de la subrutina que 
genera el número aleatorio inicial. Efectivamente, al 
cambiar la base es necesario comprobar que no apa- 
rezcan valores inadmisibles: por ejemplo, en la nume- 
ración binaria, el número anterior sólo contiene una ci- 
fra válida (los símbolos de esta base son sólo O y 1). 
Los métodos que permiten adaptar la rutina a varias 
bases son múltiples; en general pueden utilizarse ta- 
blas, internas al programa, que traduzcan de la base 
decimal a otra. Por ejemplo, para obtener un número 
binario (cualquiera, no relacionado al número decimal) 
basta con una instrucción IF en cada cifra, de manera 
que, cuando ésta sea inferior o igual a 5, se genere un 
O y, en caso contrario, se genere un 1. En esta hipóte- 
sis, el anterior valor decimal se convierte en 1100 (el 
valor decimal correspondiente es 12 y, por tanto, la 
cifra binaria no está correlacionada con el número de- 
Cimal que la genera). 

Al tratar bases superiores a 10 aparece una complica- 
ción. Por ejemplo, en la base hexadecimal (base 16), 
dos cifras decimales pueden originar una sola hexa- 
decimal (10 = A, 11 = B, etc.). 

Sin embargo, en este caso tampoco es necesario cal- 
cular los nuevos números, puesto que pueden utilizar- 
se tablas. 

En la página 2173 se han representado algunos pará- 
metros utilizados para la preparación de las máscaras. 
Estos valores corresponden al sistema decimal, por lo 
que al cambiar la base de numeración, es necesario 
cambiar también todos los parámetros. 

En particular, la colocación de los símbolos en cada 
cesto se hace en 3 líneas con un máximo de 3 símbo- 
los por línea. Al variar la base también debe modificar- 
se esta disposición, mientras que las referencias de 
línea, columna y paso pueden quedar iguales. 

En la página 2172 se ha representado el diagrama ge- 
neral. El programa está menos estructurado que los 
anteriores debido al limitado número de funciones que 
debe realizar. Sólo se utilizan dos subrutinas: la prime- 
ra (1000) se ocupa de la preparación de la máscara 
generando el número aleatorio, mientras que la segun- 
da (4000) completa la máscara con el desarrollo de la 
suma. Por tanto, el main contiene la llamada a la 
subrutina 1000, que presenta el número y los cestos 
vacíos, y espera instrucciones para colocar el número 
exacto de símbolos en cada cesto. Después se pide el 
valor a sumar. Si este valpr es O, el programa termina 
y, si no, prosigue pidiendo que se introduzca el 
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«peso» de este valor (unida- 
des, decenas, etc.) y la posi- 
ción del cesto correspondien- 
te. Este último valor (número 
del cesto) no debe ser superior 
a 4 y es controlado en relación 
al peso anterior. Por ejemplo, si 
a la primera pregunta (después 
de la introducción del valor nu- 
mérico) se responde con «cen- 
tenas», el programa compro- 
bará que el cesto indicado sea 
el número 3. Esta comproba- 
ción se efectúa memorizando 
la posición de la cadena y 
comprobando la coincidencia 
con el número del cesto. Todas 
las cadenas previstas (unida- 
des, decenas, etc.) se memori- 
zan en una matriz (con la ins- 
trucción DATA): por tanto, se 
necesita un bucle que compa- 
re la cadena introducida por 
cada elemento de la matriz y, 
en su salida, dé al flag K el va- 
lor de la posición en que se ha 
producido la coincidencia. En 
el caso de que la introducción 
no se encuentre entre los voca- 
blos memorizados en la matriz, 
el flag K valdrá O y se producirá 
la aparición de un diagnóstico 
y una nueva petición de intro- 
ducción. El valor de este flag 
(K) se utiliza también para 
comprobar la siguiente res- 
puesta (número del cesto) y, 
por tanto, los posibles nombres 
(unidades, decenas, etc.) de- 
ben memorizarse en el orden 
adecuado. 

Al final de las introducciones se 
llama la subrutina 4000 que 
completa, con el oportuno nú- 
mero de símbolos, los diferen- 
tes cestos (teniendo también 
en cuenta los acarreos). En la 
página 2174 se ha representado 
el diagrama de principio de la 
subrutina 1000, que realiza las 
funciones: 


m Presentación de la máscara 
(subrutina 2000) 
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ARITMETICA: DIAGRAMA GENERAL 


y —_—GO) 


O——> 


Termina introduciendo O 


(Indicado por el 
flag en la 4000) 


Presenta la máscara inicial y 
pide al niño que 

especifique la colocación de 
cada cifra de un número 
aleatorio de 4 cifras 


El programa pide un valor 
a sumar al que hay 
en la pantalla 


El programa pide la l 
colocación (unidades, decenas, 
centenas, millares) | 


Este bloque pone el puntero en K 
(K = 1 para las unidades, 
K = 2 para las decenas, etc.) 


La respuesta, que debe estar 
comprendida entre 1 y 4, 
se memoriza en la variable M 
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DESCOMPOSICION DE UN NUMERO DECIMAL 


La máscara está 
predispuesta para un 
empleo general 


En la llamada debe 
introducirse en K 
el número 
de cifras. La rutina 
responde 
con un valor numérico 
enNy 
Principio con uno alfanumérico 
bucle en N$. 
preguntas Además, compruebas que 
la primera cifra (la más 
significativa) 
no sea O 


Extrae de N$ el carácter en 
la posición | a partir de la 
derecha 


Los textos de la pregunta 
están en D$(») 


Respuesta 


Presenta en el interior 
del símbolo “l” un 
número de «bolas» 
igual al valor de CH$ 


T$(+*) contiene: 
Unidades 
Decenas 
Centenas 
Millares 


Los diagramas de las subrutinas 2000 (Presenta máscara) y 3000 (Genera un número aleatorio) se han omitido 


m Generación del número aleatorio (subrutina 3000) nivel de diagrama porque están estrechamente liga- 
= Presentación de preguntas y completado de la das al tipo de máquina, por lo que deberán consultar- 
máscara. se los correspondientes listados. 


A la salida de la subrutina 3000, la situación es la si- 
Las subrutinas 2000 y 3000 no se han representado a guiente: en pantalla aparece la máscara con los 4 ces- 
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COMPLETA MASCARA 


La rutina utiliza 

la matriz NS(4) para memorizar 

el número de símbolos contenidos 
en cada una de las 4 posiciones 
(unidades, decenas, etc.). La que 
debe utilizarse se indica con 10 


Principio bucle 
posicionado 
símbolo 


Tercer cesto 


Esta parte 
debe 
estructurarse 
como subrutina 
para poder 

ser utilizada 
por la línea que 
realiza el 
acarreo 2 


El contenido total es mayor 
que la base: debe hacerse un acarreo 


Determina 
la línea 
en función 
del cesto 
en que 
deberá 
colocarse 
el símbolo 


Calcula la columna 
correspondiente al cesto 


A = CO— (10— 1) x* P Columna 
XxX=A-2+C principio cesto 


El símbolo se mantiene presentado 
si el flag KV vale 1. Si no, 
se borra 


Actualiza el contador de 
caracteres insertados 
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COMPLETA MASCARA: SEGUNDA PARTE 


tos vacíos y el número que deberá ser analizado cifra 
por cifra y que dará lugar a la aparición de los símbo- 
los en los cestos. En este punto, el programa extrae 
cada cifra que compone el número (a partir de la dere- 
cha) y presenta la petición del valor de la cifra, hacien- 
do referencia al peso que le corresponde. 

El carácter introducido (CH$) debe coincidir con la últi- 
ma cifra extraída. Si existe coincidencia, se" llama la 
subrutina 4000 de completado de máscara y se pasa 
a la siguiente cifra. 

Si no es así, el programa utiliza el valor del carácter 
introducido como puntero a la matriz T$(«) que contie- 
ne los nombres de cada posición. De esta manera es 
posible formular un diagnóstico exacto indicando el 
error que ha cometido el niño. Por ejemplo, con | = 3, 
tercera vuelta del bucle principal, el valor extraído es 9 
(siempre suponiendo que el número aleatorio es 
7953), y el programa pide cuántas son las centenas. Si 
en lugar de 9, que es la respuesta correcta, se indica 
5, este valor identifica la segunda cadena de la matriz 
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Transfiere el contenido 
de A$ 


Calcula cuántos símbolos deben 
dibujarse en la celda 10. 

La variable B es 10 para 
numeraciones en base 10, 

y pone NS(I0) = O 


Utilizando la rutina anterior 


Acarreo 


Esta función no se efectúa 

si lO + 1 > 4. Además, hay que 
alzar un flag para indicar que se ha 
terminado el espacio. 


TS (x) y genera la leyenda «Decenas». Si el valor intro- 
ducido no está en el número generado, el programa 
informa de ello al usuario. 

La rutina de completado de la máscara (diagrama de 
la pág. 2175 es la más compleja, porque debe prever 
la posibilidad de un acarreo, o sea de una transferen- 
cia de un símbolo de un cesto a otro (en sentido cre- 
ciente) si se supera el valor de la base con el número 
de los símbolos. 

Por este motivo, el diagrama está dividido en dos par- 
tes. La primera muestra la lógica seguida por el com- 
pletado de los símbolos del interior de un cesto, y en la 
segunda el método utilizado para realizar los acarreos. 
El número de símbolos que hay en cada cesto se me- 
moriza en la matriz NS(«), de 4 elementos, y así, una 
simple suma indica la necesidad o no de efectuar un 
acarreo. 

Al llamar la subrutina, a la variable IO se proporcionan 
el índice del cesto y a la cadena A$ el número de sím- 
bolos a añadir a los ya existentes. La cadena A$ se 


En la generación del número aleatorio debe eliminar- 
se, si se presenta, el número 9 de la posición 4. De 
esta manera, el valor máximo posible en la posición 4 
es 8, y si se produce un acarreo desde la posición 3, el 
contenido de la 4 no supera la base. El segundo con- 
trol debe realizarse durante la introducción del número 
a sumar y de su posición. 


Diagrama de flujo general. El programa no prevé un 
menú y, por tanto, apenas activado, presenta la más- 
cara para su utilización. 

La subrutina 1000 realiza esta tarea y proporciona al 
niño el número que debe descomponer y distribuir en 
los 4 cestos previstos. Al final, una vez dadas todas las 
respuestas necesarias, la subrutina vuelve a entrar en 
el flujo principal y se activa la función de desarrollo de 
una suma. 

El programa presenta la petición de un valor a sumar 
al número ya presente en la pantalla y queda en espe- 
ra de la respuesta. 

Si se introduce el valor O (N = 0), el programa termina. 
En caso contrario, pide la atribución de un peso al va- 
lor numérico introducido (o sea, especificar si se trata 
de unidades, decenas, centenas o millares). La res- 
puesta dada, en forma de cadena que contiene el 
nombre de la posición elegida, se compara con las 
presentes. Por tanto, en el programa debe haber in- 
cluidas 4 cadenas que contengan las palabras unida- 
des, decenas, centenas y millares. Si no se encuentra, 
se indica el error y se presenta la segunda pregunta 
de «direccionado» del cesto. La respuesta es un valor 
numérico (M) que indica la posición (de 1 a 4) elegida 
por el niño. 

Con la introducción anterior se ha elegido un «peso» 
mediante su nombre (unidades, decenas, etc.), y en 
esta fase se comprueba que la indicación de posicio- 
nado sea congruente. Es decir, la máquina, mediante 
el nombre anterior, conoce el cesto de destino y lo 
compara con el indicado por el niño. Si la respuesta es 
errónea, el programa proporciona un diagnóstico es- 
pecificando el «nombre» de la posición introducida, 
pero no sugiere la respuesta correcta, que debe ser 
introducida por el usuario. 

En caso de obtención de la indicación correcta, el pro- 
grama implanta los parámetros necesarios para el fun- 
cionamiento de la subrutina 4000 (completado de la 
máscara), que suma el número introducido en el cesto 
indicado. 

Con una sencilla implantación (no prevista en los lista- 
dos), el programa puede proporcionar el nombre de la 
posición indicada especificando que no existe el nú- 
mero generado. 

Esta implantación puede consistir simplemente en di- 
mensionar la matriz T$(+) para un número de leyendas 
mayor que las necesarias, para prever posiciones in- 
cluso de índice superior a 4 (aunque esta forma es 
limitada conceptualmente y ocupa más espacio del 
necesario). 


Una forma más elegante puede obtenerse «compo- 
niendo» la leyenda en base a una sencilla lógica: para 
valores de 1 a 4, los nombres son unidades, dece- 
nas, centenas y millares; con un índice 5 debería apa- 
recer la leyenda «decenas de millar», que aparte de la 
palabra «de» ya está contenida en T$(») y puede obte- 
nerse con la suma T$(2) + “De” + T$(4). 

Siguiendo este método basta con memorizar los valo- 
res de base y la palabra millones. De esta manera se 
obtiene la respuesta correcta con la composición de 
sólo 5 datos, con números de hasta 12 cifras (centena- 
res de miles de millones). 


Descomposición de un número decimal. La subruti- 
na 1000 realiza las funciones: 


m Presentación de la máscara 

m Generación de un número aleatorio de 4 cifras 

m Bucle de pregunta, de espera y respuesta, y distri- 
bución de los símbolos 


Las dos primeras funciones se realizan con dos subru- 
tinas: la 2000, esencialmente gráfica, presenta los ces- 
tos, las leyendas y los otros símbolos que constituyen 
la base de la máscara, a completar con los valores a 
medida que se van introduciendo los datos. La 3000 
se dedica a la generación de un número aleatorio, y 
como su desarrollo es muy sencillo, se ha omitido el 
diagrama. 

Después de estas dos llamadas a las subrutinas de 
preparación, empieza el bucle de preguntas, respues- 
tas y presentación. 

En el bucle (hasta 4) se extrae, del número aleatorio 
generado en la rutina 3000, una cifra cada vez a partir 
de la menos significativa, o sea de las unidades. El 
programa pide cuál es la cifra correspondiente al peso 
indicado y la compara con la extraída. Si la respuesta 
es correcta, llama la 4000, que completa el peso indi- 
cado con un número de símbolos igual a la cifra; en el 
caso de que la respuesta facilitada no sea correcta se 
activa un diagnóstico. 

En caso de error sólo existen dos posibilidades: la cifra 
introducida está en el número pero no en la posición 
que se ha indicado, o bien la cifra introducida no está 
en el número. En el primer caso, el programa indica la 
posición correspondiente a la cifra introducida, mien- 
tras que en el segundo informa de que la cifra no está 
contenida en el número. 


Completado de la máscara. Esta subrutina es la más 
compleja de todo el programa. 
Las funciones que realiza son: 


= Complemento de los símbolos contenidos en un 
cesto. 

m Comprobación del eventual acarreo con la consi- 
guiente modificación de los símbolos que hay en 
los siguientes cestos 
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convierte en valor numérico que se suma al memoriza- 
do en NS(IO), y el resultado proporciona el número de 
símbolos que deberán presentarse en el cesto lO al 
terminar la operación. Si este valor es igual o mayor 
que la base, se llama la parte de la subrutina que reali- 
za los acarreos (del punto 2 en adelante). De otra for- 
ma, el flujo procede como se muestra en la primera 
parte del diagrama. 

Esta última parte, o sea la que sigue a la decisión IF 
NS(IO) + ... para el caso NO, se desarrolla en el dia- 
grama de la subrutina 4000 para sencillez, mientras 
que en realidad es en sí misma una subrutina, pues 
también debe ser utilizada por la rama que realiza los 
acarreos. Esta parte del programa ha de insertar, en el 
cesto IO, un número de símbolos igual al valor conte- 
nido en A$, por lo que es necesario un bucle entre 1 y 
VAL(A$) que calcule la posición del símbolo en el inte- 
rior del cesto, y lo presente. 

Es decir, debe determinar la línea (Y) y la columna (C) 
en las que posicionar el símbolo. En el sistema de nu- 
meración elegido (decimal), los posibles símbolos (de 
1 a 9) están divididos en 3 grupos de 3 símbolos cada 
uno. Por tanto, con el número de símbolos, la línea 
varía con un paso 3 (KF = 3). Así, la línea puede deter- 
minarse comprobando si el número total de símbolos 
es inferior o igual aKF, a2x* KF o a3 x= KF. El coeficien- 
te de KF (1, 2, 3) indica la línea con respecto al valor 
(YO) elegido como referencia. La columna (C), corres- 
pondiente al cesto, se calcula de manera análoga. Su 
valor se convierte en coordenadas de pantalla (X) y, 
por tanto, el símbolo se presenta en la posición X,Y. 
Al final se suma 1 a la matriz NS(IO) para tener en 
cuenta el nuevo símbolo insertado. 

Obsérvese que el valor de la columna C de posiciona- 
do (relativo) del símbolo en el interior de cada cesto se 
calcula mediante el parámetro M, que representa el 
número máximo total de símbolos en función de la lí- 
nea. Por ejemplo, si el símbolo debe posicionarse en 
la línea 1, el máximo es 3 y, por tanto, la columna se 
calcula con M-valor. Así, si el valor es 2, la columna es 
1, y con un valor 3, la columna (relativa) es O. Análoga- 
mente, para los otros grupos, el posicionado se obtie- 
ne como diferencia con M, que vale respectivamente 6 
y 9, y el valor. De esta manera, el símbolo número 6 se 
coloca en la columna (relativa) O del segundo grupo 
(6-6) y el 9 en la columna O de la tercera. 

Si el número de símbolos presentes en el cesto lO da 
lugar a un acarreo, a la entrada de la 4000, la instruc- 
ción IF... activa la rama 2 de la subrutina. La primera 
función a realizar es la anulación de los símbolos ya 
presentes en el cesto. 

En el caso anterior (sin acarreo), la operación consiste 
en añadir algunos símbolos a los ya presentes. En el 
actual, si bien la operación aritmética es la misma (su- 
ma), la correspondiente función gráfica es diferente 
debido a que la presencia de un acarreo genera segu- 
ramente un número de símbolos inferior al anterior (en 
el cesto donde se produce un acarreo). 
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Sigue el cálculo del número de símbolos a presentar. 
El total, desde el punto de vista aritmético, viene dado 
por la suma del contenido de NS(IO) (número de sím- 
bolos preexistentes) y el valor de Al$ (A$, que contiene 
el número introducido por teclado se ha transferido a 
AI$); para cada cesto, el número de símbolos a presen- 
tar es la diferencia entre este valor y la base elegida 
(en el diagrama, indicada con B, donde B = 10). Por 
ejemplo, suponiendo que los símbolos contenidos ini- 
cialmente fuesen 6 [NS(IO) = 6] y que se pida sumar 8 
(AS = AlI$ = “8”), se tendría un total de 6 + 8 = 14 
símbolos, de los cuales 4 deben presentarse en el 
cesto examinado y uno acarrearse al siguiente. 

Por tanto, las funciones a realizar son: presentación 
del número de símbolos calculado (N) y reactivación 
de toda la rutina para sumar 1 al cesto siguiente. 

La presentación de los «N» símbolos del cesto lO se 
obtiene volviendo a utilizar la rutina vista anteriormen- 
te, por lo que en A$ debe colocarse el valor N (trans- 
formado en ASCI!), y el número NS(IO) debe hacerse 
igual a O. En la salida se obtendrá la presentación del 
número de símbolos N del cesto lO (4 símbolos con 
los valores numéricos anteriores). El segundo consiste 
en sumar 1 al cesto lO + 1 (acarreo). En el diagrama, 
la función se indica simplemente en un bloque des- 
criptivo, pero en realidad, su ejecución presenta algu- 
nas complicaciones. 

A su vez, el acarreo al cesto siguiente puede ocasio- 
nar otro acarreo, y así sucesivamente para todas las 
posiciones previstas. Por tanto, en cada incremento de 
posición, debe volver a utilizarse por completo toda la 
lógica de la subrutina 4000. Es decir, el último bloque 
del diagrama, después de la implantación de los pará- 
metros (10 = 10 + 1, puntero al siguiente cesto y A$ = 
“1”, acarreo), debe volver al punto de entrada de la 
rutina (antes de la comprobación del valor de la su- 
ma). Es decir, la salida de la rutina representada en la 
segunda parte del diagrama sólo es a nivel lógico, y la 
verdadera salida es la prevista en la primera parte, 
puesto que la actividad de la 4000 sólo puede terminar 
después de haber encontrado una posición en la que 
sea posible realizar una suma sin acarreo. 

Este proceso podría continuar de manera indefinida, 
permitiendo utilizar valores con un elevado número de 
cifras. En la realidad, deben limitarse los posibles aca- 
rreos al número de cifras representado por los cestos, 
O sea 4. 

Por tanto, el último bloque de la segunda parte de la 
subrutina es activado sólo si el cesto en el que deberá 
sumarse el acarreo, o sea el número 10 + 1, es igual o 
inferior a 4. O sea que, si se produce la condición 10 + 
1 < 4, se emite un aviso y el programa se interrumpe. 
Para evitar esta eventualidad pueden comprobarse los 
valores introducidos para que no sea posible un aca- 
rreo de la posición 4. 

Este control debe realizarse tanto durante la gestación 
del número aleatorio de partida como durante el diálo- 
go con el niño. 


Para obtener estas funciones es necesario memorizar 
el número de símbolos que hay en cada cesto, y para 
esto se ha reservado la matriz NS (+) de cuatro ele- 
mentos. La función puede activarse desde cualquier 
posición y, por tanto, debe preverse un índice (10) que 
la especifique. El último parámetro es el número de 
símbolos a insertar (A$). Por tanto, antes de la llama- 
da, el programa implanta los siguientes valores: 


10 = Posición, de 1 a 4, en la que realizar la suma. 

A$  =Número de símbolos a sumar. 

NS (+) = Número de símbolos ya presentes en cada 
cesto. 


Por ejemplo, suponiendo que se haya presentado el 
número 1486, se tendría: 


NS(1) = 6 
NS(2) = 8 
NS(3) = 4 
NS(4) = 1 


Si se desea sumar 8, la subrutina debe llamarse escri- 
biendo: 

A$ = «8» 

10 = 1, puesto que son unidades 


mientras que si se desease sumar el mismo valor (8) a 
las decenas, bastaría escribir lO = 2. 

La primera función a realizar al entrar en la rutina es la 
comprobación de la existencia de acarreo. El control 
se realiza sumando el número ya existente, contenido 
en N$(10), al valor a sumar, contenido en AS. Si el re- 
sultado supera el valor 9 (en esta versión se trata del 
sistema de numeración decimal) debe efectuarse la 
subrutina de acarreo (al punto 2 del diagrama). 

De otro modo debe completarse sencillamente el ces- 
to seleccionado con el número de símbolos igual al 
valor numérico contenido en A$. Esta parte, que se 
realiza con un bucle entre 1 y VAL(A$) en el diagrama, 
por sencillez se ha representado como si perteneciese 
a la 4000, pero en el listado se realiza en forma de 
subrutina para que pueda utilizarse desde otros pun- 
tos del programa. 

La función a realizar para la presentación del algunos 
símbolos es conceptualmente muy sencilla, pero se 
complica por necesidades estéticas y por la parame- 
trización. El programa también puede ser utilizado por 
sistemas de numeración diferentes al decimal. Por tan- 
to, variando la base, varían tanto el valor generador del 
acarreo como la disposición de los símbolos en cada 
uno de los cestos. 

Para el sistema decimal, el número máximo de símbo- 
los en un cesto es 9 (valor a partir del cual se produce 
el acarreo). En consecuencia, se ha decidido presen- 
tar el contenido en tres líneas de tres símbolos como 
máximo cada una. Así, si el número de símbolos a pre- 
sentar está comprendido entre 1 y 3, se utiliza la pri- 
mera línea, para valores entre 4 y 6, la primera y la 
segunda línea, y para valores entre 7 y 9, las tres lí- 


neas. Indicando con KF el número máximo de símbo- 
los en la primera línea (o sea 3), para decidir en qué 
línea deben posicionarse los símbolos a presentar, 
bastará comparar su número con KF y 2 x KF (o sea 3 
y 6). Determinada la banda correspondiente (1, 3, 6), 
debe identificarse su posición, y ya podría ocuparse 
parcialmente, por lo que los primeros símbolos deben 
insertarse a partir de la primera posición vacía. La co- 
lumna (C) de posicionado se calcula con la diferencia 
entre el número máximo (M) correspondiente a la línea 
y el que debe presentarse (NS(I0)). El valor así obteni- 
do es la columna de principio de presentación, referi- 
da a un lado del cesto. A partir de este valor, sumando 
la posición del cesto, se obtiene el direccionado abso- 
luto referido a las coordenadas (línea, columna) de la 
pantalla. Por tanto, sólo hay que presentar el símbolo 
en dicha posición e incrementar NS(I0) en 1. 

En cambio, en el caso de acarreo (punto 2 del diagra- 
ma), debe memorizarse A$ en una matriz adecuada 
(AS se utiliza de nuevo, y sin esta transferencia, se per- 
dería el dato), borrar los símbolos que hay en el cesto 
en curso del proceso, calcular los que debe haber en 
el siguiente y activar la rutina de completado. 

El borrado de los símbolos presentes en el cesto en 
curso de proceso es necesario porque, en el caso de 
acarreo, el número de símbolos a presentar después 
de la suma es inferior al que existía antes; por ejemplo, 
con un valor anterior de 6, sumando 8 se tendrá 14, o 
sea 1 de acarreo y 4 en presentación. El problema 
también puede resolverse borrando los sobrantes y 
escribiendo el nuevo valor. 


Geometría 

En la página 2180 se han representado la estructura 
de los ficheros y la lógica utilizada. Los datos están 
memorizados en 5 ficheros: 


DIB Contiene los datos necesarios para la pre- 
sentación del dibujo, o sea los valores del 
sprite o de la tabla de los desplazamientos. 
Por su naturaleza es el más largo y, por tan- 
to, un registro lógico está subdividido en va- 
rios registros físicos, cuyo número depende 
de la versión. 

Contiene el nombre de cada figura. 

Los registros de este fichero, de número 
igual al de figuras presentes, están dividi- 
dos en 4 campos, uno por parámetro pre- 
visto. Por ejemplo, en el caso del triángulo, 
el registro correspondiente contiene: BASE, 
ALTURA, LADO 1 y LADO 2. 

PRE Contiene el texto de la pregunta, o sea el 
nombre de la magnitud a calcular. También 
en el ejemplo del triángulo, los dos campos 
del registro contienen: AREA y PERIMETRO. 
En este fichero hay memorizadas las fórmu- 
las para el cálculo relativo a las dos cantida- 
des anteriores. Para el triángulo, los dos 


NOMB 
PARA 


CALC 
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ESTRUCTURA DATOS Y LOGICA DE EJECUCION 


1 registro lógico 


En la pantalla se presenta 


el sprite 


Mr 
El puntero de principio 
datos sprite identifica el 


registro que contiene el nombre 


TRIANGULO 


Base = X 
Altura = Y 
Lado 1=Z 
Lado 2 =K 


¿Area? = ... 
¿Perímetro? = .. 


El nombre se presenta junto 


al sprite 


El mismo puntero 
sirve para los 
parámetros 


¿Ola 


El programa presenta los 


parámetros con un valor 
aleatorio al lado 


a | 


Se extraen las dos preguntas 


Después de la 
introducción, 
el programa 
comprueba 

el resultado 
comparándolo 
con el fin de la 
fórmula del 
fichero CALC 


El texto de las preguntas se 
presenta en pantalla 


El programa extrae las 
dos fórmulas 


campos del registro contienen: 0.5* 1 *2, 0 
sea 1/2 X BASE X ALTURA, y 1+1+3+4, 
osea 1 *(BASE + LADO 1 + LADO 2). Re- 
cuérdese que siempre es necesario el fac- 
tor de multiplicación. 


En la tabla de la página siguiente se han presentado 
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Sy yr 


Respuesta Error 
correcta 


las características principales de cada fichero. Arriba 
se ha representado el programa desde el punto de 
vista lógico, y con más detalle en el gráfico situado de- 
bajo, en la misma página. La primera función consiste 
en presentar la figura, por lo que se lee el fichero DIB, 
que contiene los datos gráficos, y en pantalla aparece 
el sprite o, en general, el dibujo de la figura geométrica. 


FICHEROS UTILIZADOS EN EL PROGRAMA GEOMETRIA 


(*) La longitud indicada corresponde al número de bytes lógicos. La longitud del registro físico puede ser diferente. Por 
ejemplo, en la versión C-64 siempre se utiliza un formato de registro de 63 bytes como máximo, por lo que el registro lógico del 
sprite es igual a 3 registros físicos. Esto significa que el primer fichero debe leerse con paso 3. 


EJEMPLO DE UTILIZACION DE DATOS 
1 reg. lógico 


El fichero DIB contiene el sprite 
del triángulo. Los formatos y 
valores dependen de cada 
máquina 


En el fichero NOMB se escribe 
el vocablo «TRIANGULO», que 
se presentará como 
complemento de la figura 


El fichero PARA 

contiene los nombres de las 
magnitudes que deberán utilizarse 
para las respuestas. En este caso: 
base, altura y los 2 lados 


En el fichero de las preguntas (PREG) 
se memorizan las palabras 

a presentar como pregunta. 

En este caso se piden el área 

y el perímetro 


El fichero CALC es más complejo. Cada registro está dividido en dos partes, una para 
cada pregunta, y contiene un primer campo de 6 bytes para cualquier valor numérico y 
un segundo campo de 7 bytes con los punteros de los parámetros y los símbolos de 
las operaciones a realizar para obtener el resultado pedido en la pregunta. 

Por ejemplo, la primera parte, correspondiente al área, contiene: 


123.4 5 .6]|1 2 3 4 5 6 7 


bob.0 5|1 + 2 bb bb b 0b 

porque el área es (base x altura)/2, o sea 0.5 + (base « altura). El primer campo contie- 
ne el factor multiplicador 0.5, mientras que el segundo (1 *) indica que debe multipli- 
carse el primer parámetro (base) por el segundo (altura, ver fichero PARA). 
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La lógica descrita sólo corresponde a la utilización de 
los datos; la preparación de los archivos, operación 
que debe realizarse antes de cualquier utilización, es 
completamente independiente y se realiza con un pro- 
cedimiento muy diferente al acostumbrado debido al 
número de ficheros que hay que gestionar. 

En la ilustración del uso del programa se ha empezado 
con el flujo del fichero DIB, puesto que es el primero 
que debe utilizarse desde el punto de vista lógico. En 
realidad, la estructura no puede utilizar este fichero co- 
mo elemento principal, porque existe una diferencia 
entre la longitud del registro lógico y la del registro físi- 
co. Para sencillez, conviene utilizar como referencia el 
fichero NOMB, porque sobre su contenido también se 
realizan las búsquedas para seleccionar las figuras en 
base al nombre. Por tanto, este fichero debe prever el 
directorio. 

En la página siguiente se ha representado el diagrama 
de principio del programa de introducción o correc- 
ción de datos. Como se ha indicado, el fichero «pilo- 
to», o sea el utilizado como puntero para los otros, es 
NOMB y, por tanto, se lee el registro 1, y su contenido 
(número del último registro escrito) se transfiere a MX. 
Sigue la selección de la función (introducción o actua- 
lización). La única diferencia consiste en el valor atri- 
buido a RE (número de registros en los que se memo- 
rizarán los datos). En el primer caso (introducción), de- 
be seleccionarse la primera posición no ocupada, o 
sea RE = MX + 1. En el segundo caso, el programa 
debe preguntar qué registro se quiere variar y esperar 
la respuesta, que se transferirá a RE. El flujo del pro- 
grama de actualización prosigue con la lectura de los 
datos existentes, pero en el caso de la introducción, 
este bloque se salta y el programa pasa directamente 
a la gestión de la máscara, que se realiza de la manera 
usual. En cambio, la actualización de los datos en el 
disco es muy diferente a la de los otros programas. 
Generalmente, una máscara vídeo contiene valores 
que pertenecen todos al mismo fichero, por lo que su 
memorización se resuelve con la formación de una so- 
la cadena, suma de todos los buffers, y en su escritura 
en disco. En este caso, la misma máscara contiene 
valores que deben memorizarse en ficheros diferen- 
tes. La situación con respecto al gráfico de la página 
anterior es la siguiente: 


= Número de la figura: es el número de registros en 
los que se escribirán los datos. No debe transferirse 
al fichero. En introducción contiene el valor MX + 1, 
y en actualización el introducido por el usuario. 

m Nombres: este campo, cuyo valor está en B$(2), 
debe transferirse al fichero NOMB del registro que 
coincide con el número de la figura. 

m Parámetros: los cuatro parámetros contenidos en 
B$(3), B$(4), B$(5), B$(6) deben ser transferidos al 
fichero PARA, siempre en el mismo registro. 

m Preguntas: dos campos, 1 por línea, contenidos en 
los buffers B$(7) y B$(10), transferidos al fichero 
PREG. 
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m Cálculo: las dos líneas de cálculo contenidas en 
B$(8), B$(9), B$(11), B$(12) deben escribirse en el 
fichero CALC. 


Por tanto, la subrutina de escritura de los datos debe 
respetar la siguiente tabla: 


Fichero Registro 

NOMB B3(2) 

PARA BS$(3) + B$(4) + BS$(5) + B$(6) 
PREG B$(7) + B$(10) 

CALC B$(8) + B$(9) + B$(11) + B$(12) 


Análogamente, en presentación debe leerse el mismo 
número de registros de los cuatro ficheros, desempa- 
quetando después los datos de modo análogo. 

El diagrama de presentación de preguntas y compro- 
bación de respuestas, como ya se ha indicado, es un 
programa en sí mismo, y se ha representado en las 
páginas 2184 y 2185. 

La primera función es la pedida por el número de re- 
gistro de la figura geométrica sobre la cual se desea 
hacer las preguntas. La descripción que aparece en la 
pantalla puede ser «Número de lección», porque cada 
figura reside en un registro diferente, y si se hubiese 
tenido la precaución de memorizar los datos por difi- 
cultad creciente, los registros leídos en sucesión pue- 
den identificarse con el número de lección. 

Sin embargo, tal y como se ha presentado el progra- 
ma, no hay previsto ningún control sobre las lecciones 
superadas, por lo que el usuario es el que debe elegir 
el número preciso. 

Esta implantación puede activarse en este procedi- 
miento uniendo parte de los programas utilizados para 
la ortografía, y precisamente toda la lógica de gestión 
del fichero Usuarios. De esta manera, introduciendo el 
nombre del niño que va a ejecutar el programa, se 
tiene el posicionado automático en la primera lección 
aún no superada, o sea la presentación de preguntas 
sobre la figura geométrica que sigue a la última anali- 
zada. 

El número de registro, o sea de figura, puede ser me- 
nor que O, p. e. — 1: en este caso, el programa pide el 
nombre de la figura, y si el nombre es FIN, el programa 
termina. Si no es así, se busca en el fichero NOMB y, si 
está, el número de registro en que se ha encontrado 
se utiliza como valor para definir todos los otros datos, 
o sea es tomado como número de lección. 

Si bien esta estructura es algo farragosa, es necesaria 
por dos motivos: el programa puede utilizarse como 
formulario y, por tanto, necesita una entrada por nom- 
bre de figura y, además, los datos podrían no estar en 
el orden adecuado para constituir un conjunto de difi- 
cultad creciente. En este caso, la numeración de los 
registros no coincidiría con la progresividad de las lec- 
ciones, y sería necesario un método diferente de ac- 
ceso. Si el nombre introducido no existe, la subrutina 
de búsqueda responde con un código de error, se 


DIAGRAMA DE LA INTRODUCCION O LA CORRECCION DE DATOS 


Transfiere 
al disco 


El sprite, o en general 

la figura, se crea cada 

vez. Por tanto, en 

actualización también 

debe redibujarse toda la figura. 
En fase de memorización, 

al fichero DIB deberán 
transferirse tantos 

registros físicos como 

haya en uno lógico 


Del registro 1 del fichero 
NOMB se extrae el número 
del último registro 
ocupado y se transfiere 

a la variable MX 


El programa pide si se trata 
de una introducción o de una 
corrección de los datos 
existentes (con un menú 
secundario) 


Si la opción pedida es 1, 
se entra en introducción, 
por lo que la máquina 
calcula el número de 
registro (anterior + 1). 
Si no, se pide al usuario 
en la actualización 


De los 4 ficheros que contienen 
los datos se extrae el registro 
RE para preparar la máscara 


Esta función, como la carga 
de los DATA, es análoga 

a la de los otros programas 
(según la secuencia 

7000, 2000, 3000) 


El bloque de transferencia 
selecciona el nombre del 
fichero en base al buffer 


Crea el sprite 
y lo transfiere 
al disco 
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USO DEL PROGRAMA DE GEOMETRIA: 
DIAGRAMA DE PRINCIPIO 


El programa pregunta qué 
figura se desea. El usuario 
puede indicarla con el número 
progresivo 


Si se introduce un número 
menor que O, el programa 
pide el nombre de la figura. 
El acceso al nombre (fichero 
NOMB) es el segundo modo 
de hallar una figura dada 


Esta subrutina carga el 
registro N (si N > 0) o busca 
el nombre introducido. En este 
caso, N contiene el número de 
registro en el que se ha 
hallado el nombre. 

SIN = 0 se tiene un error 


y si y 
si 
E El nombre no 
se ha hallado 


yy No | 
El sistema, partiendo del 
puntero (N) del nombre, 


calcula el principio de sprite: 
oa P=1 + Kx(N- 1) con 
K = número de registros físicos 
y ocupados por el sprite 


Carga los 
datos del 
sprite (*) 


Lectura de los nombres de los 
parámetros asociados a la figura. 
Los parámetros se presentan 
junto al sprite 


Las preguntas son 2 (escritas 
en el registro Único HN) 


(*) Para la versión DOS, el sprite se sustituye por una tabla de las figuras 
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emite un diagnóstico y el programa vuelve a presentar 
la pregunta. Obsérvese que como código de error se 
utiliza la misma variable empleada en introducción pa- 
ra el número de registros. 

Esto es posible porque, o el usuario selecciona la lec- 
ción con el número de registro, y por tanto la variable 
asociada tiene un valor mayor que cero, o utiliza la 
segunda modalidad, o sea el número de registro es 
menor que O y se introduce el nombre de la figura. 
En la subrutina de búsqueda, si este nombre se en- 
cuentra, la variable asociada contiene el número de 
registro y, si no es así, permanece con valor cero. A la 
salida de la rutina, esta condición indica el error de 
nombre no hallado. 

El número de registro en el que se ha encontrado el 
nombre es el puntero del conjunto de datos corres- 
pondientes a la figura. Sin embargo, esto sólo es váli- 
do para los ficheros que contienen descripciones y fór- 
mulas, mientras que para el sprite o la tabla de la figu- 
ra no se tiene «paralelismo», porque un registro lógico 
está compuesto por varios registros físicos. Por ejem- 
plo, suponiendo que el dibujo pueda ser memorizado 
en 320 bytes y que la longitud del registro físico sea de 
80 bytes, se necesitan 4 registros (320/80 = 4) para 
contener toda la figura. Por tanto, mientras que para 
todos los demás registros la figura está en el registro 2, 
ésta empieza en el registro 5. 

Indicando con N el puntero a la figura geométrica en- 
tendida como conjunto de datos (por tanto N es el nú- 
mero de registro en el que se ha encontrado el nom- 
bre) y con K el número de registros físicos que contie- 


Al lado de los parámetros se 
escriben valores numéricos aleatorios, 
que el usuario deberá utilizar 

para formular la respuesta 


nen los datos correspondientes al dibujo, el puntero de 
inicio será: 


P=1+Kx(N- 1) 


Efectivamente, si cada figura ocupa K registros, la de 
la posición 1 queda desplazada, con respecto al inicio 
del fichero, en la cantidad K x* (N — 1). 

Por ejemplo, con los valores anteriores (4 registros pa- 
ra una figura, K = 4), la figura número 2 (N = 2) em- 
pieza en el registro 


P=1+4x*(2-1)=5 


Después del cálculo de este valor, la rutina lee todos 
los registros inherentes a la figura, o sea de Pa P + 
K-1.Conlos valores así cargados, la subrutina puede 
presentar el sprite o, en la versión DOS, la figura en 
alta resolución. Esta parte del programa no puede ser 
generalizada, puesto que depende del tipo de máqui- 
na utilizado y, por tanto, debe consultarse el corres- 
pondiente listado. La función que sigue es la lectura 
de los parámetros del fichero PARA. El número de re- 
gistro coincide con el número de figura, por lo que es- 
tá contenido en la variable N. Cada parámetro se es- 
cribe al lado de la figura y del nombre. Por ejemplo, en 
el caso del triángulo, aparecerán las leyendas: 


Base 

Altura 
Lado 1 
Lado 2 
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Las cantidades que aparecen en un segundo tiempo 
al lado de cada parámetro deberán utilizarse para cal- 
cular los valores pedidos por el programa. 

Después de esta presentación se lee, siempre en el 
registro N, el fichero PREG, por lo que en pantalla apa- 
recen las dos preguntas. En este momento, el usuario 
conoce las magnitudes a calcular y los parámetros 
que deberá utilizar, y sólo quedará por completar la 
máscara asignando a cada parámetro un valor aleato- 
rio. El usuario deberá realizar el cálculo de las dos 
magnitudes e introducir los resultados. El sistema, utili- 
zando las fórmulas escritas en el fichero CALC (siem- 
pre en el registro N), calcula los valores correctos y los 
compara con los introducidos por el usuario. 

Esta lógica explica la complejidad de la estructura. 
Una solución mucho más sencilla, en términos de pro- 
gramación, consiste en utilizar valores predefinidos y 
fijos, con la ventaja de que, después de un primer uso, 
la respuesta puede proporcionarse memorizando sim- 
plemente un valor numérico y no el método de cálculo. 
Por contra, la estructura utilizada tiene el defecto de no 
tener en cuenta eventuales valores numéricos incon- 
gruentes con la figura geométrica. Este inconveniente 
podría superarse cambiando la lógica del programa. 
En la forma indicada, la comprobación de la correc- 
ción de las respuestas se obtiene comparando los dos 
valores numéricos: el primero suministrado por el 
usuario y, el segundo, por la máquina calculándolo de 
acuerdo con las indicaciones hechas en la fase de ge- 
neración de la pregunta. Estas indicaciones (fichero 
CALC) están constituidas por una cadena que contie- 
ne los punteros de los parámetros a utilizar y las opera- 
ciones aritméticas a realizar. 

Por ejemplo, en el triángulo, la fórmula para calcular el 
área es: 0.5*'1 * 2, donde 1 indica el primer parámetro 
(Base) y 2 el segundo (Altura). El procedimiento podría 
pedir fácilmente los nombres de los parámetros utiliza- 
dos y, por tanto, construir la cadena: 


0.5 * BASE + ALTURA 


que expresaría el cálculo a realizar. En este momento, 
el usuario podría introducir la respuesta como fórmula, 
eliminando así las posibles incongruencias. 

En realidad, este método no es tan sencillo, porque 
aparece la necesidad de analizar todas las posibles 
combinaciones. Por ejemplo, si el usuario introduce la 
fórmula 0.5 * ALTURA * BASE, la fórmula también es 
correcta, pero no será aceptada por el sistema, salvo 
notables complicaciones de la subrutina de análisis de 
respuestas. Y viceversa, utilizando valores numéricos, 
la máquina o el usuario realizan el cálculo de la mane- 
ra que se considere más oportuna. 

El diagrama de la subrutina de gestión de la lectura de 
datos está en la página siguiente. El parámetro a pro- 
porcionar en la entrada es N, con los significados: 
N > 0 para la búsqueda en base al número progresivo 
de la figura y N < O para la búsqueda en base al nom- 
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bre. Este mismo parámetro es proporcionado como 
respuesta por la rutina, y si asume el valor O, el nombre 
no ha sido hallado. Por tanto, la primera función a reali- 
zar es un test sobre el valor de N. En el caso de que 
sea mayor que cero, se lee el registro correspondiente 
y se extrae el nombre de la figura, previa comproba- 
ción de que N no supere el número máximo de figuras 
existentes, en cuyo caso, N se hace igual a cero y la 
subrutina termina en error. 

Si se debe realizar la búsqueda en base al nombre 
(N < 0), se activa un bucle de lectura de todos los re- 
gistros del fichero y de comparación entre sus conteni- 
dos y el nombre introducido por el usuario. Si la com- 
paración es positiva, la variable N contiene el número 
de registro en el que se ha hallado el nombre. De otro 
modo, N se deja en valor cero (flag de error). 
Obsérvese que la subrutina realiza una sencilla com- 
paración entre dos cadenas (la introducida por el 
usuario y la leída en el fichero), por lo que los nombres 
siempre deben escribirse de la misma manera. Una 
implantación que puede reducir los errores consiste 
en transformar todas las letras siempre en mayúsculas 
o siempre en minúsculas para evitar errores debidos a 
diferencias de escritura. En la página 2188 se ha re- 
presentado el diagrama de la subrutina de generación 
y escritura de valores para los parámetros previstos en 
el fichero PARA. 

En general, una figura geométrica puede no necesitar 
los 4 parámetros, por lo que es necesario un bucle de 
1 a 4 con exclusión de los valores correspondientes a 
parámetros no previstos, o sea en blanco. El valor nu- 
mérico a asociar a cada parámetro se genera aleato- 
riamente, descartando los inferiores a 2. En el diagra- 
ma y en el listado sólo se utiliza la parte entera para 
simplificar el desarrollo del cálculo por parte del usua- 
rio, aunque nada impide incluir algunas cifras decima- 
les para utilizar también el programa como ejercicio de 
aritmética. En este caso es preciso truncar el número 
de cifras necesario, tanto en la respuesta del usuario 
como en el valor calculado por la máquina. 

Como ya se ha dicho, la rutina consiste en un bucle de 
1 a 4, en cuyo interior se genera un número aleatorio 
que se presenta al lado del parámetro correspondien- 
te al índice del bucle, a menos que se trate de un pará- 
metro nulo. Además de este bucle principal, hay pre- 
visto otro secundario, cuya finalidad es evitar eventua- 
les repeticiones de valores. Por tanto, después de la 
generación del valor a asociar al parámetro, se ejecuta 
un bucle entre los valores ya existentes y el nuevo sólo 
se acepta si no se produce ninguna igualdad. 

El diagrama de la rutina de análisis de las respuestas 
se ha representado en las páginas 2189 a 2191. Debe 
emplearse después de la rutina de introducción de la 
respuesta y, por tanto, en la llamada, la matriz de ca- 
dena R$(2) contiene los dos valores numéricos (uno 
para cada una de las dos preguntas) introducidos por 
el usuario. Además, la subrutina utiliza la matriz real 
Z(6), cuyo significado se explica más adelante. 


LECTURA DEL FICHERO NOMB 


En entrada: N > O Lectura del registro N 
N < 0 Busca el nombre 


En salida: N + O El nombre existe en el registro N 
N = 0 Error 


MX contiene el último registro 
escrito en el fichero NOMB 


y 
yy si 
y 


Búsqueda en base al nombre 


y 
y 


NO 
“mao 


Todo el flujo de esta parte del programa se encuentra 
subordinado al valor del índice N que identifica una fi- 
gura por lo que una vez implantada esta variable (ver 
introducción o búsqueda del nombre), ya no es preci- 
so variarla. 

En esta rutina, el valor de N también identifica el regis- 
tro a utilizar. En el fichero CALC se lee el valor de este 
registro y la fórmula que contiene. Los primeros 6 by- 
tes que constituyen el valor numérico multiplicador se 
transfieren a Z(5), mientras que la segunda parte, la 
fórmula propiamente dicha, se transfiere a A$. Esta 
transferencia se hace dos veces: la primera utiliza los 


yy Ss 


Salida en error. El nombre 
no está o está escrito de 
diferente modo 


bytes de 7 a 13 y genera el cálculo para la primera 
respuesta, y la segunda los bytes 20 a 26 para el otro 
cálculo (recuérdese que las preguntas, y por tanto los 
cálculos a realizar, son 2). 

Para el desarrollo del cálculo, contenido en símbolos 
en la cadena Af, la rutina debe ejecutar un bucle ana- 
lizando, carácter por carácter, el contenido de AS. Si el 
carácter es un número (comprendido entre 1 y 4, por- 
que los parámetros son 4), se extrae el valor asociado 
al parámetro correspondiente. Si el parámetro es un 
espacio, se ignora, y si es el símbolo de la operación, 
ésta se efectúa. A medida que se extraen los punteros 
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ESCRITURA DE LOS VALORES 


(*) La subrutina utiliza la matriz P(4) 
en la que se memorizan los 
valores aleatorios a asignar 

a los parámetros 


(**) Para asignar un valor a uno 

de los 4 parámetros (primeros 4 buffers 
de la máscara) es necesario que 

se haya previsto, es decir, que 

sea diferente de “b” 


Se genera un número aleatorio 
entero y comprendido entre 

2 y 9 para evitar errores 

de interpretación 


NO y IA A AAAXKX<Á Comprueba 


yy Sl 


ls 
O 


que el número 

no se haya 

utilizado 

(F = 0> número 
aceptable. Si 

F = 1 número ya 
generado, y por tanto 
no aceptable, 

vuelve a la 
generación) 


ANALISIS DE LAS RESPUESTAS: PRIMERA PARTE 


La subrutina utiliza la matriz En la entrada, R$(2) contiene las 

Z(6) real (mejor si es en dos respuestas. 

doble precisión) N es el registro de PREG que 
contiene las preguntas 

presentadas 


Del fichero CALC se lee el 
registro N, que contiene las 
indicaciones para realizar 
el cálculo 


Primeros 6 bytes. El valor 
numérico correspondiente se 
one en Z(5 
Estas funciones pueden il (5) 
parametrizarse para extraer 
también la segunda parte 


correspondiente a la A 
En AS se transfieren los bytes 
di de 7 a 13 (primera fórmula) o de 
20a 26 


Principio bucle de cálculo 


Salta si el byte es b 


Ei control sólo debe realizarse 

entre 1 y 4, porque los valores ; 
deben estar comprendidos aa ab simbolo 
en este intervalo 


K se pone a cero al principio del 
bucle (K1 se pone igual a 1). 

El valor NP(K + 1) identifica el 
parámetro en el fichero PARA y el 
valor en la matriz P(4) 


Toma el 
valor correspondiente 


O 


A la realización del cálculo 
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La matriz CM$(4) 
contiene en este orden 
los símbolos “«*”, “:”, 
“+” "y se 

inicializa con 

una DATA 


a los campos y los símbolos de la operación, los co- 
rrespondientes valores son memorizados por los pará- 
metros que hay en Z(+) y por los operadores en OP(+). 
En detalle, la lógica es la siguiente: 


1 / La subrutina extrae un carácter de la cadena A$. 

2 /Si este carácter es un número, se memoriza en la 
matriz NP(*) de los punteros porque identifica uno 
de los 4 parámetros. El valor numérico correspon- 
diente al parámetro se transfiere a Z(«) en las pri- 
meras 4 posiciones. 

3 / Si el carácter es un símbolo (+, —, «*, /), a OP(+*) se 
transfiere el indicador correspondiente: 1 si el sím- 
bolo es «xx» (multiplicación), 2 con «/», 3 con «+» y 
4 con «—». 


Al final del bucle, punto 4 del diagrama, la situación es 
la siguiente: 


" La variable Z(5) contiene el valor multiplicador. 

m Enla matriz de Z(1) a Z(4) se memorizan los valores 
numéricos de cada uno de los 4 parámetros. 

= La matriz P(4) contiene los punteros a los paráme- 
tros utilizados (no se ha dicho que en la fórmula en- 
tren todos). 

" La matriz OP(3) contiene los operadores a utilizar 
para el cálculo. 


En la segunda parte del diagrama, a partir del punto 4, 


se muestra el desarrollo. 
Inicialmente, a Z(6) se transfiere el valor contenido en 
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Extrae la 
modalidad de 
cálculo y la 
memoriza 


Z(1), o sea el valor del primer parámetro. A conti- 
nuación se analiza el operador OP(1) (con bucle de 
1 a 4) y, en base a su contenido, se realiza el cálculo 
Z(6) = Z(6) x Z(2). 

Al final del bucle sobre los operadores (de 1 a 4), el 
resultado del cálculo realizado sobre los valores de los 
parámetros se encuentra en Z(6), y sólo hay que multi- 
plicarlo por Z(5), que contiene el valor numérico. Sigue 
la comparación con el dato introducido por el usuario 
en la variable R$(1). Si coinciden, la respuesta es co- 
rrecta y puede pasarse a analizar la segunda respues- 
ta. En caso contrario, se tiene indicación de error y la 
rutina termina. 

Obsérvese que la comparación entre el valor calcula- 
do (Z(6)) y el introducido por el usuario debe realizarse 
con un número de cifras definido, por lo que conviene 
transformarlo todo en entero, ya que podría tenerse 
indicación de error a causa de las cifras decimales 
que el usuario haya podido aproximar. 

A continuación se presentan solamente los diagramas 
de las funciones más significativas; las partes para 
funciones o lógica del programa, análogas a las desa- 
rrolladas para otros temas, se han omitido y pueden 
verse fácilmente en los listados. Por ejemplo, el pro- 
grama prevé un menú principal con las dos voces Ge- 
neración y Uso. 

A su vez, la primera voz tiene las opciones: 


1 / Generación propiamente dicha. 
2 / Introducción y variación de los datos. 
3 / Fin de tarea. 


ANALISIS DE LAS RESPUESTAS: SEGUNDA PARTE 


Los datos utilizados en 

esta parte de la subrutina 

son: 

R$(2) = Respuestas dadas 
NP(4) = Punteros a los campos 
Z(6) = Valores 

OP(3) = Operadores 


En Z(6) el resultado 

de la fórmula calculada con los 
valores presentados en la máscara 
se compara con la primera 
respuesta (*) 


Realiza las mismas 
funciones sobre los 
datos de la segunda 
respuesta 


NO J, > sr ceo 
(a) Vuelve a la introducción de respuestas (ver diagrama 
de principio) 


(*) En los listados, el control (Z(6) = valor introducido por el usuario) se realiza sólo en la parte entera para evitar errores debidos a las aproxima- 
ciones de cálculo 
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PRESENTA FORMULA 


La subrutina utiliza 

B2$(4) para transferir 

la parte escrita de los buffers 
(1 — 4) y tener así una 
representación más 
compacta de la fórmula: 

A$ = cadena de la fórmula 
leída en el disco 

Z(5) = factor multiplicador 


RE = respuesta examinada 
BS(RE + 4) = buffer que contiene 
el texto de la pregunta 
correspondiente 


F$ = contiene STR$(Z(5)) + F1$, 
o sea la parte numérica (factor 
multiplicador) y la parte cadena 
de la fórmula final 


(*) Los cuatro operadores "+", 
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PRESENTA FORMULA (EXTRACCION DE LOS BUFFERS) 


B25(+*) = a esta cadena se 
transfiere la parte 
izquierda menos 1 carácter 
del buffer 4+B 


ANUN dIÓ 


S$ = MID$ (B2$(B),K9,1) 


Si S$ es un carácter, lo suma 
a BB$ 


ES 


vi E 
046 
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Los correspondientes diagramas, análogos a los de 
los otros programas, se han omitido. Además, muchas 
subrutinas secundarias no tienen la indicación de la 
línea de principio, lo que depende de la notable dife- 
rencia entre las distintas versiones y, por tanto, los dia- 
gramas sólo tienen validez general en línea de princi- 
pio y como orientación de la lógica seguida. 


Introducción o corrección de datos. El diagrama de 
la página 341 muestra las funciones a desarrollar para 
la introducción de nuevos datos o la corrección de los 
existentes. Naturalmente, esta función sólo puede acti- 
varse después de la generación del sistema, que, co- 
mo siempre, consiste en la preparación e inicialización 
de los ficheros. 
La primera función realizada en esta rutina (14000) es 
la lectura del registro 1 del fichero NOMB. Este registro 
mantiene el número progresivo de la última figura intro- 
ducida y se utiliza como puntero para todos los demás 
ficheros. Sigue (con menú secundario) la petición de 
corrección de los datos relativos a una figura ya intro- 
ducida. En el primer caso, el número de registro en el 
que empieza la memorización lo calcula la máquina, y 
en el segundo se pide al usuario. Este método de di- 
reccionado es idóneo para la máquina, puesto que se 
basa en proporcionar directamente la «dirección» del 
dato en el disco, pero puede resultar incómodo para el 
usuario, que está obligado a recordar en qué sucesión 
ha introducido las diferentes figuras. Para obviar este 
inconveniente también se ha previsto la búsqueda so- 
bre el nombre de la figura, por lo que si el usuario re- 
cuerda la dirección de los datos que desea corregir, 
puede introducirla directamente. Si no es así, respon- 
de con un —1 y el programa pasa a la lógica de bús- 
queda. Este método se ha adoptado en el programa 
de utilización de los datos. Ver páginas 2184 y 2185. 
En este caso se pide el nombre de la figura a modificar 
y se realiza una búsqueda en el contenido del fichero 
NOMB. El número de registro con el que se obtiene 
coincidencia es el puntero. 
Una vez identificado el registro, el programa pasa a la 
lectura de todos los datos correspondientes, o sea de 
los ficheros PREG, PARA, CALC, además del NOMB. 
De esta manera se cargan todos los datos que com- 
ponen una máscara. Siguen su presentación y gestión 
con una data entry normal. 
En cambio, la transferencia al disco es muy diferente. 
Generalmente, a cada máscara le corresponde un fi- 
chero, por lo que el registro se obtiene sumando los 
diferentes elementos de B$(+). En este caso, los fiche- 
ros a gestionar son 4, y para cada uno sólo deben 
considerarse algunos elementos de la matriz. Por tan- 
to, el listado es el más complejo del diagrama porque 
debe prever la gestión simultánea de 4 ficheros, cada 
uno con un formato de registro diferente. Una vez intro- 
ducida esta parte descriptiva, se activa la subrutina de 
creación y de memorización del dibujo (sprite para el 
C-64 y la versión VSX, alta resolución para la versión 
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DOS). Esta subrutina no se describe porque es idénti- 
ca a las utilizadas en los otros programas. Sólo debe 
tenerse en cuenta que no se han previsto modificacio- 
nes en el dibujo, por lo que para aportar una modifica- 
ción debe volverse a dibujar por entero. Los datos así 
admitidos, que constituyen los elementos para la pre- 
sentación de la figura, se memorizan en el fichero DIB. 
Al final, el programa pide si se desea proseguir con 
una nueva figura o volver al menú. 


Diagrama de flujo de principio. El diagrama de las 
páginas 2184 y 2185 muestra la lógica del programa 
que, utilizando los datos del archivo constituido en la 
generación, plantea las preguntas y comprueba las 
respuestas. La primera parte se dedica a la selección 
de la figura sobre la que se desea responder. La lógi- 
ca se ilustra en la subrutina anterior. El programa pide 
el número de la figura (N). Si el usuario responde con 
un valor inferior a O (-1, etc.), se pide el nombre de la 
figura y se activa la subrutina de búsqueda. 

En realidad, el flujo prevé una rutina única para ambos 
Casos, por lo que en el interior de ella deben distinguir- 
se dos casos: N >, la figura es identificada por su 
número de registro y no se produce ninguna búsque- 
da; N < O, la figura debe buscarse en base al nombre 
introducido por el usuario. 

El mismo flag N se utiliza como respuesta. Si la rutina 
encuentra el nombre, pone en N el número de registro 
y, si no, N se hace igual a O. Esta condición se com- 
prueba en la salida para detectar condiciones de 
error. Si la figura es identificada introduciendo su nú- 
mero de registro o su nombre válido, se pasa al cálcu- 
lo del puntero (P), que permite la lectura del dibujo. 
En la estructura de los ficheros, los nombres se memo- 
rizan en el fichero NOMB, uno por registro, mientras 
que el dibujo puede ocupar varios de ellos. De hecho, 
en el fichero DIB, un registro lógico ocupa varios regis- 
tros físicos. En esta parte del programa se calcula el 
puntero P al primer registro del dibujo. Para cargar to- 
do el sprite (o la figura en alta resolución), sigue un 
bucle de lectura del registro P a P + K- 1, donde K es 
el número de registros físicos que constituyen un re- 
gistro lógico del fichero DIB. 

Con la misma lógica se cargan los parámetros (del fi- 
chero PARA) y las dos preguntas (fichero PREG). 
Sigue la presentación de la máscara vídeo con los va- 
lores aleatorios atribuidos a cada parámetro (valores 
que deberá utilizar el niño para dar las respuestas), la 
lectura de las dos respuestas y su análisis. Si el cálcu- 
lo realizado por la máquina no proporciona valores 
coincidentes con los introducidos por el niño, se tiene 
la presentación de un mensaje de error y una nueva 
petición de introducción para rectificar la anterior. 


Lectura del fichero NOMB. El diagrama de la página 
2187 muestra la lógica de la subrutina de búsqueda y 
de lectura del fichero NOMB. En la llamada debe im- 
plantarse: 


N < 0 si se desea la búsqueda en base al nombre; 
N > 0 para la lectura directa del registro N. 


En el segundo caso, después del control N < MX para 
asegurar que no se haya pedido un número de regis- 
tro superior al último escrito, se tiene la lectura del re- 
gistro indicado por el valor N y la salida de la rutina. 

En cambio, en el primero, se necesita un bucle que lea 
cada registro del fichero, extraiga el campo «nombre 
de la figura», y lo compare con el pedido. Si el registro 
se encuentra, se pone N = RE (como flag de respues- 
ta), y si no, N = O. Obsérvese que el bucle de lectura 
empieza desde el registro 2, porque el primero se re- 
serva para el directorio del fichero y no contiene datos. 
El método de búsqueda es secuencial, o sea consiste 
en un bucle de lectura a partir del primer registro útil, 
hasta el último, con comprobación de cada registro de 
la correspondencia o no del campo clave (nombre de 
la figura). 

Esta solución es muy sencilla desde el punto de vista 
de la programación, pero es poco funcional porque 
puede requerir tiempos importantes para efectuar la 
búsqueda. En cambio, una «búsqueda binaria» es 
más funcional, porque permite seleccionar el registro 
con un número de lecturas muy inferior, pero necesita 
el fichero ordenado según el campo a buscar. 

Dado el limitado número de registros, para esta aplica- 
ción se ha preferido la primera solución, que si bien es 
menos funcional, resulta más inmediata. 


Escritura de los valores. La subrutina (pág. 2188) ge- 
nera 4 números aleatorios y los asocia a cada uno de 
los 4 parámetros previstos. La función, conceptual- 
mente sencilla, se complica por la necesidad de algu- 
nos controles. 

En primer lugar, y antes de asignar y por tanto escribir 
en el vídeo un valor, es necesario que el correspon- 
diente parámetro haya sido utilizado, por lo que para 
cada uno de los 4 números aleatorios se controla si 
existe (en B$()) la descripción del parámetro. Si el 
parámetro existe, o sea si su descripción no es nula, el 
valor es asignado y, de otra forma, no. De hecho no se 
ha dicho que la figura examinada utilice todos los pa- 
rámetros. Por ejemplo, para el cuadrado sólo hace fal- 
ta uno (lado), y omitiendo el control anterior, en panta- 
lla se tendrían tres valores numéricos de más (corres- 
pondientes a los parámetros no utilizados). 

También es necesario otro control para evitar valores 
duplicados. El generador de números aleatorios pue- 
de producir valores iguales, causando confusión en la 
interpretación de la pregunta. Por tanto, antes de 
aceptar un valor, se compara con los anteriores: si ya 
se ha presentado, se elimina y en su lugar se genera 
un nuevo valor. 


Análisis de las respuestas. La función realizada con- 
siste en calcular, para cada respuesta, cuál es el valor 
correcto y compararlo con el dado por el usuario. La 


función, conceptualmente sencilla, se hace compleja 
desde el punto de vista de la programación porque la 
fórmula a desarrollar no está predeterminada, sino que 
debe obtenerse analizando el contenido del registro 
del fichero CALC. 

La subrutina empieza leyendo el registro N de CALC 
(N contiene el número del registro correspondiente a la 
figura examinada). De este registro se extrae la fórmu- 
la (una de las dos previstas) poniendo en Z(5) el valor 
numérico multiplicador (véase el formato del fichero) y 
en A$ el contenido de los bytes 7 a 13 que contienen, 
en símbolos, la fórmula a aplicar (los valores se refie- 
ren a la primera pregunta. Para la segunda sólo varían 
los punteros). 

Sigue un bucle que examina cada carácter de A$ y 
obtiene la expresión del cálculo. 

Del bucle se extrae un carácter que, si está en blanco, 
se pasa al próximo y, si no, existen dos posibilidades: 


1 / El puntero es un número: en este caso, este valor 
es el puntero al parámetro a utilizar. Por ejemplo, si 
el carácter es un «3», significa que hay que tomar 
el valor del parámetro número 3. El valor numérico 
de este parámetro (asignado por el generador de 
números aleatorios) se transfiere a la primera posi- 
ción vacía de la matriz Z(+). 

2 / El carácter es un operador (+, —, «, /): el operador 
se compara con los previstos y se memoriza su po- 
sición en OP(x). Este valor se utilizará después 
para realizar el cálculo. 


Al final del bucle, la matriz Z(«) contiene, en las cuatro 
primeras posiciones, los valores de los parámetros y, 
en OP(x), las operaciones a realizar sobre ellos. 

En este punto, el desarrollo del cálculo consiste en un 
bucle sobre los valores y en la realización, de vez en 
cuando, del cálculo indicado en OP(*). También en 
este caso es necesario un control que interrumpa el 
bucle si se han terminado los parámetros. Este control 
se realiza en OP(+): ante el primer elemento vacío (con 
contenido 0), el programa sale del bucle y calcula el 
resultado final. 

Este valor se coloca en Z(6) y se compara con el dado 
por el usuario. 

En caso de coincidencia, la respuesta es correcta, y el 
programa realiza las mismas funciones con la segun- 
da fórmula. Si no es así, se emite un diagnóstico de 
error y se pregunta al usuario si desea la presentación 
de la fórmula. En caso de que la respuesta sea afirma- 
tiva, el programa llama la subrutina 8000 de presenta- 
ción de fórmulas. 

Esta rutina consiste en un bucle sobre los caracteres 
de la cadena A$, análogo al anterior, que, una vez ha- 
llado el valor, toma el nombre del parámetro corres- 
pondiente y lo acumula en la cadena utilizada para 
presentar la respuesta. Es decir, la rutina decodifica el 
contenido de la fórmula y escribe los distintos paráme- 
tros que intervienen. 
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Aritmética. En la foto se muestra la fase inicial del 
programa (versión DOS) que ilustra el desarrollo de 
una suma. Esta primera parte'se dedica a comprobar la 
capacidad del niño para descomponer un número de 
4 cifras. El programa ha presentado el valor 1414 y, en 
base a las respuestas dadas, convierte cada cifra en un 
número correspondiente de símbolos gráficos que se 
colocan en el cesto indicado. 


Al final de la fase anterior se pide al niño que introduzca 
un número a sumar al presentado, indicando el cesto 
(o sea atribuyendo un peso al número). 


El valor introducido y “pesado” con la indicación 

del cesto, se suma al número anterior (1414). La foto 
muestra el resultado final que se obtiene pidiendo que 
se sume el valor 6 al cesto de las centenas. Por tanto, 
el número a sumar es 600 (6 centenas) y la situación de 
los cestos se actualiza en consecuencia. Análogamente 
se actualiza la parte superior de la pantalla que muestra 
el desarrollo desde el punto de vista aritmético. 
Obsérvese que todas las pantallas vídeo 
correspondientes a la versión DOS son en alta 
resolución y, por tanto, el programa utiliza una rutina 
particular que permite realizar las funciones de gestión 
de las máscaras vídeo en alta resolución. 


Geometría: menú principal. Las voces previstas son 
Generación e Introducción-Actualización. La primera 
consiste únicamente en la preparación de los ficheros 
y no requiere ninguna acción por parte del usuario, 
mientras que la segunda voz representa la preparación 
propiamente dicha de las preguntas (figuras y texto). 


COMPON EL NUMERO 


MILLARES CENTENAS DECENAS UNIDADES 


CUANTAS CENTENAS 


1414+60909= 


MILLARES CENTENAS DECENAS UNIDADES 


EN QUE CESTO 


1414+500"DE) 


NILLARES CENTENAS DECENAS UNIDADES 


Ll 


1009x 109x 
A — 


o] > Ú 
NUMERO 


GENERACION 
INTRODUCCION 
FIN DE TAREA 


UL 


VARIAC 


La foto muestra la construcción del dibujo durante la 
fase de introducción. También en este caso, la ausencia 
de una gestión de sprites obliga a la utilización de la alta 
resolución. Para simplificar el uso, en este programa se 
ha incluido un “simulador de sprite”, que permite asociar 
a cada tecla un símbolo gráfico: es decir, se genera un 
teclado gráfico análogo al del Commodore o al de los 
sistemas MSX. Con los símbolos así definidos se puede 
construir cualquier dibujo “escribiendo”. En la foto se 
muestra cómo el sistema mantiene siempre informado 
al usuario del juego gráfico y del carácter particular que 
está utilizando. 


La foto muestra la presentación de una pregunta 
generada con el método ilustrado anteriormente. El 
sistema ha extraído un número aleatorio (6) asociándolo 
al parámetro (lado) y espera que el usuario introduzca 
la respuesta (perímetro) 


Con el valor del parámetro, el usuario calcula el valor 
que debe dar como respuesta. 

La foto contiene un error: el usuario ha introducido 35 
como valor del área. El programa calcula el verdadero 
valor utilizando las fórmulas introducidas en la 
generación, e indica el error 

La aparición de un error produce además la posibilidad 
de presentar la fórmula. El programa presenta la 
correspondiente pregunta y espera una elección 


El usuario no ha pedido la fórmula y ha corregido el 
valor introducido (AREA = 36). En este caso, el dato 
introducido coincide con el calculado, y la pregunta es 
superada. El sistema se pone en espera para proseguir 
con la siguiente figura o para salir del proceso 


PERIMETRO 


PERIMETRO 
AREA 


CUADRADO 


LADO 1 


CUADRADO 


LADO 


1 


Aritmética. En el sistema MSX, el programa Aritmética 
también presenta al niño el sistema de numeración 
decimal mediante la operación de la suma. La pantalla 
presentada se sirve de los gráficos para representar los 
números cada vez que éstos son introducidos por el 
niño. En este caso, el usuario ya ha compuesto el 
número propuesto por el programa (constituido por 5 
unidades, 3 decenas, 4 centenas y 6 millares). En este 
punto, el programa espera la introducción del número 
a sumar junto con el número y el nombre del cesto en 
el que debe realizarse la operación. 

La numeración de los cestos es la siguiente: 

4: Millares 

3: Centenas 

2: Decenas 

1: Unidades 


El niño ha pedido sumar al número generado por el 
programa nueve decenas. La operación (6435 + 90) 

se visualiza en la parte alta de la pantalla, y gracias a la 
presentación de los símbolos gráficos, en el interior de 
los cestos se muestra la lógica del acarreo. 

La ejecución puede proseguir con la generación de 

un nuevo número aleatorio (siempre compuesto por 

4 cifras) y podrá interrumpirse introduciendo la cifra 

O con la petición del valor a sumar. 


Geometría: generación. Para Geometría se han 
previsto dos programas separados, el primero de los 
cuales es necesario para la creación de los ficheros de 
datos en los que se introducirán las lecciones. En este 
programa hay un menú principal para activar las 
distintas funciones previstas: la Generación es la 
primera a seleccionar, y permite preparar la cassette 
con datos para las futuras introducciones. 


Geometría: introducción. La introducción de las 
lecciones de Geometría prevé como primera fase la 
creación de la figura geométrica analizada (constituida 
por sprites). 

En la segunda parte se introducen el nombre de la 
figura, los parámetros necesarios para los procesos 
(un máximo de 4) y las operaciones a realizar, que 
representan las preguntas planteadas en la fase de 
desarrollo. Los campos de introducción, llamados 
CALCULO, están reservados para la fórmula sobre 
la que se realiza la operación. 


E.6.S- Ediciones Furum,S.A. 
ARITMETICA 


COMPON EL NUMERO 6435 


= 
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E.G.S. Ediciones Furum,S.A. 
ARITMETICA 


6435 + 90 = 6525 
MILLARES CENTENAS DECENAS UNIDADES 
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E.6.S. Ediciones Forum, S.A. 


GEOMETRIA Csener.?> 


-> 1 -GENERACION 
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A 


0 -Fin de tarea 
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INTRODUCCION DATOS 


Nombre  PECTANGULO 
Parametros 
1= LADO 1 2= LADO 2 
3= 4= 


Figura mn. 3 


Calculo 
= Hu.» + 
= Hu upon + 


Operacion 
RARA ASA 


CTRL Y <ATUDA? 
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Geometría: uso. Ahora el niño está desarrollando las 
lecciones de Geometría: en primer lugar, el programa 
espera que se posicione la cinta datos para poder leer 
las lecciones introducidas con el programa de 
generación. El módulo de desarrollo de las lecciones 
de Geometría trabaja con la pantalla en alta resolución, 
permitiendo el uso de los colores y de los dibujos. 


Para que cada niño que usa estas lecciones pueda 
elegir la que desea, el programa pide el número 
correspondiente a la figura a presentar. Introduciendo 
el valor -1 puede buscar, entre las que hay en el 
soporte magnético, la lección correspondiente a una 
figura geométrica precisa introduciendo el número de 
esta última. La palabra «Fin» producirá la salida del 
programa. 


En el programa de desarrollo de las lecciones de 
Geometría se ha pedido al niño la correspondiente al 
círculo. La máscara vídeo en la que se introducirán las 
respuestas se desarrolla en una pantalla de alta 
resolución que permite el uso de dieciséis colores para 
las leyendas. 

En presentación aparece la figura introducida en la fase 
de generación con el nombre correspondiente, los 
parámetros previstos (hasta 4) y los valores (generados 
aleatoriamente por el programa) que deben asociarse a 
los mismos. Después se presentan las preguntas, y el 
programa espera la introducción de las respuestas 
(convalidadas por la tecla F5). 


La foto de al lado se refiere a la máscara vídeo 
dedicada a la presentación de la fórmula de cálculo 
correspondiente a la respuesta errónea. 

La fórmula se escribe mediante los punteros a los 
cuatro parámetros que identifican las cadenas a 
presentar. Esta opción se presenta cada vez que 
el niño comete un error y pide su activación. 


A 5 5 5 5 
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Extensiones y modificaciones 


Aritmética 

Para obtener una versión del programa más general 
y completa, es necesario llevar a cabo las siguientes 
modificaciones: 


1 / Posibilidad de variar la base de numeración. 
2 / Aumento del número de cifras gestionadas. 
3 / Extensión a las otras operaciones aritméticas. 


La primera, variación de la base, es la más sencilla, 
porque el programa ya contiene algunos elementos 
para activarla. 

Como ya se ha indicado en la descripción, basta con 
variar el valor de KF y pocas instrucciones. En particu- 
lar, las correspondientes al acarreo y al posicionado 
de los símbolos en el interior de los cestos. 

El segundo punto, correspondiente al incremento del 
número de cifras gestionadas (4 en las versiones de 
los listados) no presenta ninguna dificultad desde el 
punto de vista de la programación. De hecho, se trata 
simplemente de variar los valores de fin de los bucles. 
En cambio, debido a las dimensiones de la pantalla, 
se necesita una modificación sustancial de la presen- 
tación gráfica. Por tanto, se trata de una reestructura- 
ción completa de algunas partes del programa y no de 
una simple modificación. 

La extensión del programa a otras operaciones aritmé- 
ticas, además de requerir una compleja modificación 
del programa, también presenta notables dificultades 
de funcionamiento, en particular para las operaciones 
de multiplicación y de división, cuya lógica difiere mu- 
cho de la presentada. 

Una posible solución, si bien limitada, consiste en eli- 
minar toda la parte inferior de la máscara vídeo (la co- 
rrespondiente a la realización de las sumas) y sustituir- 
la por un diálogo mediante el cual pueda introducirse 
un número, por ejemplo, utilizando la sencilla instruc- 
ción INPUT. 

Después de la introducción (y la comprobación de 
que el valor no sea cero en el caso de la división), 
debe borrarse toda la pantalla y reclamar la rutina de 
presentación modificada, pasándole el resultado de la 
operación como número de símbolos a presentar. 

En detalle, las operaciones a realizar son: 


1 / Modificación del diagrama general eliminando todo 
el diálogo. En su lugar deben insertarse sólo dos 
entradas: la primera correspondiente a la opera- 
ción a realizar (+,—, x, :), y la segunda para la intro- 
ducción del valor numérico. 

2 / Separar la subrutina 3000 de la 1000. La 3000 pue- 
de incluirse en el main antes de la llamada a la 
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1000. De esta manera, el número N se convierte en 
un parámetro a utilizar en la llamada. 

3 / Llamar, en el main, una primera vez la 1000 con 
N generado en la 3000. Por tanto, se tendrá la com- 
posición de un número generado aleatoriamente, 
como en la suma. 

4 / Al final, borrar completamente la máscara y activar 
una subrutina que pida la introducción del resulta- 
do de la operación. 

5 /Si el resultado introducido por el niño es correcto, 
debe transferirse a la variable, o sea la subrutina 
1000, para que quede con el mismo aspecto que 
antes. 


Sin embargo, hay que tener en cuenta que esta solu- 
ción es limitada, puesto que no ilustra los diferentes 
pasos a realizar en el desarrollo de la operación, y sólo 
es un medio ameno para comprobar el resultado. 


Geometría 

El programa de Geometría puede asimilarse a la ges- 
tión de un archivo, con la posibilidad adicional de reali- 
zar los cálculos indicados en algunos campos del re- 
gistro. 

Por tanto, sus posibilidades dependen esencialmente 
del número de campos que puede gestionar y de la 
complejidad de las fórmulas que debe aplicar. 

La versión presentada está dedicada a los niños y, por 
tanto, corresponde únicamente a la geometría plana y, 
con fines estéticos, incluye la representación gráfica 
de la figura geométrica. Esta estructura particular tiene 
como consecuencia la necesidad de contener el nú- 
mero de parámetros (4) y la complejidad de la fórmula, 
que no admite el uso de paréntesis. 

Para aplicaciones más complejas es necesario agilizar 
el procedimiento eliminando la parte gráfica por no ser 
necesaria y prever un aumento del número de pará- 
metros y de la complejidad de las fórmulas. 

El número de parámetros puede variarse muy fácil- 
mente modificando el formato de registro y las funcio- 
nes de introducción y de presentación. En cambio, en 
lo referente a las fórmulas, la modificación es más 
compleja, y consiste en la sustitución completa de la 
subrutina de desarrollo por otra que pueda reconocer 
paréntesis. En las páginas 2201 y 2202 se han listado 
unos ejemplos de dichas subrutinas, incluidas en un 
programa de demostración. 

Para su uso como implantación de Geometría deben 
extraerse de ellas las distintas partes, modificando los 
nombres de las variables y los números de las líneas. 
El programa de demostración, del que sólo se ha pre- 
sentado la versión completa para la versión MSX (para 


las otras sólo las modificaciones), en la entrada pide 
los nombres de los campos a procesar y los respecti- 
vos valores (5 como máximo, aunque este valor puede 
ampliarse a 20 variando simplemente el índice del bu- 
cle en la línea 22). 

Al final de esta introducción puede insertarse la fórmu- 
la en la que aparecen los nombres de los campos. 
La fórmula puede contener todas las operaciones arit- 
méticas (+, —, +, :, A) y un número cualquiera de pa- 
réntesis. Su desarrollo empieza por el cálculo indica- 
do en los paréntesis más internos, procediendo hacia 
el exterior. Sin embargo, debe tenerse en cuenta que 
en el interior de los paréntesis no se considera la priori- 
dad de los símbolos, sino que las operaciones se reali- 
zan en el orden de introducción. Por ejemplo, el cálculo 
3 + 6/2 da 4,5, porque primero se hace la suma y des- 
pués la división. Para superar esta dificultad basta con 
insertar un bucle de exploración sobre la expresión 
que asigne las prioridades de cálculo y aplicarla si- 
guiendo los punteros así determinados. La subrutina 
de cálculo empieza en la línea 2000 y se realiza en la 
cadena A$2, por lo que esta cadena debe analizarse 


10 SCREENO:KEY OFF:WIDTH 40 

15 DIM E$(20),D$(20),K8$ (20) 

20 FOR I=1 TO S:¡READ K8$(1):NEXT 1 

22 FOR I=1 TO S:PRINT"DESCRIFCION ";1¿: INPUT D$(1),B$(1):NEXT 1 
23 LOCATE 1,10:PRINT"EXFRESION":LOCATE 1,12: INPUT A$ 

25 REM 

30 DEF FNA=21”Z2 

32 DEF FNB=Z14Z2 

33 DEF FNC=21/22 


37 DEF FND=Z1+22 
40 DEF FNE=21-Z2 
50 GOSUR 100 
55 1F Pi=1 AND P2=LEN(A$) THEN 80 
60 GOSUR 1000 
70 GOTO 50 
80 A26=A$:G0SUB 2000 
85 R$=A4$:LOCATE 1,17: PRINT"RESPUESTA = "¿R$:END 
100 REM CALCULO PUNTEROS 
102 F1=0:P2=0 
105 IO=LEN(AS$) 
110 FOR I=1 TO 19 
115 CHé$=MID$(A4$,1,1) 
120 IF CH$="(" THEN Fi=1:GOTO 130 
125 IF CH$=")" THEN P2=1: 1=19:GOTO 160 
130 NEXT 1 
35 IF Pi=0 THEN Pi=1 
140 P2=19: RETURN 
160 IF P1=0 THEN Pi=1:P2=19 
145 RETURN 
1000 N=F2-P1-1 
1005 Ni=P1+1 
1010 N2=P1-1 
1015 N3=LEN(A$) 
1020 AL$=LEFTS (A4,N2) 
1025 A2$=MID$ —(A$,N1,N) 
1030 A3$=RIGHTS (A$,N3-F2) 
1035 GOSUB 2000 
1040 A$=A1$+A4S+N7$ 
1045 RETURN 
2000 REM CALCULO 
2002 L9=LEN(A24) 
2005 IF L9=0 THEN RETURN 
2010 K8=0:K=1:N$="";C4="" 
2015 I=1 
2020 K8=0:CH$=MID$ (A2$,1,1) 
2023 FOR J=1 TO S:1F CH$=K8$(J) THEN K8=J:J=5 
2030 NEXT J 
2035 1F K8 <> O THEN 2600 
2500 IF ASC(CH$)<48 OR ASC(CH$) 57 THEN 2510 
2505 N$=N$+CH$:GOTO 2515 
2510 C$=C$+CH$ 
2515 I=I+1:1F ISLEN(A2$) THEN I=I-1:GOTO 2600 
2520 GOTO 2020 i 
2600 IF I=1 THEN BEEF:LOCATE1,21:PRINT"ERROR":ER=3: END 
2605 IF N$=""THEN 2615 
2610 ZA=VAL (M$):GOTO 2630 
2615 GOSUR 5000 
2620 IF K1=0 THEN BEEP:LOCATE1,21:FRINT"ERROR":ER=4: END 
2625 ZA=VAL (BG (K1)) 


carácter por carácter, tomando los punteros que dan 
las prioridades. 

El programa de demostración contiene un main que va 
desae la línea 10 a la línea 85, por lo que para estruc- 
turarlo como subrutina basta con eliminar estas líneas, 
que deben incluirse en el main que deba utilizar la 
subrutina. 

Finalmente, obsérvese que el desarrollo de las opera- 
ciones se obtiene definiendo funciones de usuario (lí- 
neas 30 a 40). En las máquinas que no tienen previsto 
este tipo de instrucciones deben eliminarse las líneas 
y modificarse la parte de cálculo (líneas 9002 a 9400), 
explicitando la operación a realizar. Por ejemplo, la 
9002 en lugar de: ZT = FNA, se convierte en: 


Z1=Z1A22 


Además, la línea 10 contiene instrucciones típicas 
MSX y, en el caso de que se utilice otro sistema, debe- 
rán modificarse o eliminarse, como la LOCATE (de po- 
sicionado del cursor), que deberá sustituirse por la co- 
rrespondiente del sistema utilizado. 


2201 


2630 IF K<>1 THEN 2645 
2635 Z1=ZA1K=2 
2640 Có="":KT=k8:G0TO2515 
26435 ¿K=1 

2647 
2650 ON KT GOSUE 9000,9100,9200,9300,9400 
2633 A4$=STR$(2T) :A4$=RIGHTS (A4$,LEN(444)-1) 
2660 L=LEN(A2$):1F I=L THEN RETURN 

2665 A2$=A04$+RIGHT$ (024, L-1+1) 

2670 GOTO 2000 

5000 REM BUSCA C$ IN D$ 

3005 K1=0: IF I=+LEN(A2$) THEN C$=CH$ 

5010 FOR W=1 TO 5 

3015 IF C$=D$(W) THEN Ki=W:W=5 

5020 NEXT W 

5025 
9000 
9002 
9100 
9200 
9300 ZT=FND: RETURN 
9400 ZT=FNE: RETURN 
10000 DATA“S", "yO, 0/0, 00, 


¿EM MODIFICACIÓN PARA VERSION C-64 


4 

5 

10 FRINT"0J" 

23 =10:GOSUB 11000: PRINT"EXPRESION" 

239 112: GOSUE 11006: INFUT A+ 

165 Ri=A93:%=1:Y=17 :GOSUB 11000:PRINT"RESPUESTA = "¿R3:END 
4 1F 1=1 THEN =1:Y=21:G0SUE 11000:FRINT"ERROR": ER 


IF K1=0 THEN x= 
A REM 
2¿T1=21 122: RETURN 
B Z2T=21422:E 
21=21/22: RETURN 
3 A RETUERH 

21=21-22 RETURN 
1 REM POSICIONA CURSOR: 
11003 POKE 211,X:POKE 214,%1:5vS958732 
11619 RETURN 


107 


1 REM MODIFICACIONES FARA VERSION DOS 

2 REM 

3 REM  N.B.: BORRAR DEL LISTADO 

4 REM ORIGINAL LAS LINEAS 30,32,35,37,40 
S REM s 

10 HOME 


23 HTAB 1: VTAB 10: PRINT "EXPRESION" 

24 HTAB 1: VTAB 12; INFUT A$ 

85 R$ = A4$: HTAB 1: VTAB 17 

87 PRINT "RESPUESTA = "¡R$: END 

2600 IF 1 = 1 THEN PRINT CHR$ (7) 

2602 HTAB 1: VTAB 21: FRINT "ERROR":ER = 3: END 
2620 IF Ki = O THEN PRINT CHR$ (7) 
2622 HTAB 1: VTAB 21: PRINT "ERROR":ER 
9000 REM 

9002 2T = 71 * 22: RETURN 

9100 ZT = Z1 * 22: RETURN 

9200 21 = 71 / 72: RETURN 

9300 2T = Zi + 22: RETURN 

9400 ZT = Z1 - 22: RETURN 


> 
m 
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21:GOSUE 11000 :PRINT"ERROR"-ER=4:EHND 
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Aritmética 
DES(+) 
D$(«) 
NS(«) 
TS$(«) 


ADS$(+) 


AX(«) 
BX(+) 
BASE 
HOS 
N 

S$ 

M 

10 


FIN 
AS 


ER 
NS 


Geometría 
BS(+) 


LC(+) 


ND(x) 


CX(+) 
CY (+) 


DX(+) 
DY (+) 


TF(+) 


2212 


RELACION DE LAS VARIABLES - COMMODORE 64 


=nombres de los cestos 

= matriz que contiene las preguntas 
previstas 

= número de símbolos presentes en 
los 4 cestos 

=matriz de las cadenas para la 
comprobación de las respuestas. 

= matriz que contiene los factores 
multiplicadores a presentar 
(1000x,100x, 10x, 1x) 


=posiciones en la pantalla de las 
cadenas ADS$(«) 

=número máximo de símbolos si- 
multáneos en un cesto 

= borrado en pantalla 


=n 
=n 
=f 


úmero a sumar 
ombre del cesto en que sumar 
úmero del cesto en que sumar 


=número del cesto actual 

= flag para salir del programa 

= Cadena que contiene los acarreos 
en forma alfanumérica 

= flag de error 

= valor aleatorio en forma alfanumé- 
rica (4 cifras) 


= matriz de los buffers (1 por campo 
de introducción) 

= longitud del campo de introduc- 
ción 

= número de decimales en el campo 
de introducción 


= coordenadas en el vídeo del cam- 
po de introducción 


=Ccoordenadas en pantalla de la 
descripción 


= matriz numérica que contiene los 


códigos ASCII de las teclas de co- 
mando 


DS(«:) 
VOS$(+) 
BL$ 
PD$ 
AS$ 
NS$ 


HOS 
NUC 


DS 
FIS(+) 
LFS(+) 


HS(«) 
B15(+) 


A,B5,C,D 


NFS 
KTS 
MX 
LZ 


= descripciones en las máscaras ví- 
deo 

=voces del menú principal 

= blank 

= punto decimal 

= Carácter "—. Identifica los campos 
de introducción alfanuméricos 

=carácter “*”. Identifica los cam- 
pos de introducción numéricos 

= borrado de pantalla 

=número de campos de introduc- 
ción en la máscara vídeo activada 

=número de descripciones en la 
máscara vídeo 

= matriz de los nombres de los fi- 
cheros de datos utilizados 

= longitud registro de ficheros datos 
utilizados 

= matriz de las cadenas ayuda 

= matriz que contiene los valores 
sprite en forma alfanumérica 

=vaniables de comprobación de 
error en el disco 

= fichero datos considerado 

= nombre de la figura a modificar 

= último registro insertado 

= bloque de memoria reservado a 

datos sprite 

=dirección de partida para intro- 

ducción datos sprite 

= matriz de las teclas de comando 

en creación sprite 

= índice de la tecla pulsada en crea- 

ción sprite 

= número de la figura considerada 

=puntero al registro de principio 
lección 

= respuestas 

= valores útiles para cálculo 

= Operadores previstos (“+", “—, “/”, 

= mensaje de error en disco 

= nombre de la figura pedida 
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RELACION DE LAS VARIABLES - APPLE 


=contiene el nombre de las cifras 
(“centenas”, “decenas”, etc.) 

=número aleatorio presentado en 
pantalla 

=en cada elemento hay una cifra 
del número NX 

=número de bolas a dibujar en un 
cesto 

= número de cesto 

= CHR$(4), código para envío y lec- 
tura de datos en disco 

= 40 blanks 

=Uusada para envío de mensajes a 
pantalla 

=unidad seleccionada 

=número juego caracteres en alta 
resolución seleccionado 

= Código de retorno del carácter de 
la rutina que lee el carácter 

= determina el tiempo de parpadeo 
del cursor 

=Coordenadas actuales del cursor 


= código de entrada a dar a la rutina 
de escritura carácter 


Geometría 


D$ = CHR$(4), código para envío y lec- 
tura de datos en disco 
= 40 blanks 
= descripciones campos 
por la data entry 
= buffer data entry 
=tipos de campos 
= longitud de campos 
= Coordenadas X descripciones 
= coordenadas X campos 
YD(+) =coordenadas Y descripciones 
YC(+) =coordenadas Y campos 
A$ =usada para envío de mensajes a 
pantalla 
=unidad seleccionada 
= buffer del disco 
=número registro 
= longitud registro 
= nombre fichero ' 
=número juego caracteres de alta 
resolución seleccionado 
= número lección seleccionada 
= número lecciones en el disco 
=si = 1, indica actualización en cur- 
so 
=número campos que forman la 
máscara 
=número máscara seleccionada 
= código de retorno del carácter de 
la rutina que lee el carácter 
= determina el tiempo de parpadeo 
del cursor 
*xC, YC = coordenadas actuales del cursor 
Co = código de entrada a dar a la rutina 
de escritura carácter 
= matriz dibujo en alta resolución 
(códigos caracteres) 
= matriz dibujo en alta resolución 
(códigos juego) 
N =número lecciones 
KO = apunta al 1.” registro del dibujo 
correspondiente a la lección 
RE = apunta al 1.” registro de la lección 
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RELACION DE LAS VARIABLES - PHILIPS VG 8010 


Aritmética 


DES(«) = matriz cadenas para los nombres 
de los cestos 

= matriz cadenas para las pregun- 
tas previstas 

=número de símbolos que hay en 
los cestos 

= matriz de las cadenas para com- 
probación respuestas 

= matriz que contiene los factores 
multiplicadores a presentar 


DS(«) 
NS(=) 
TS(«) 
ADS(») 


AX(«) 


BX(+) = posición en pantalla de las cade- 


nas ADS$(«) 

= base del sistema de numeración 
considerado 

= valor a sumar 

= nombre del cesto en que sumar 

=número del cesto en que sumar 
(1-4) 

= índice al cesto considerado 

= flag de salida 

= Cadena que contiene los acarreos 
en forma alfanumérica 

=valor aleatorio generado por el 
programa en forma alfanumérica 

= índice de indicación de error 


Geometría 


BS$(«) = matriz de buffers (1 por campo de 
introducción) 

= longitud campo de introducción 

= número decimales en el campo de 


introducción 


LC(x) 
ND(=) 


CX() 
CY («) 


DX(«) 
DY (+) 


TF(«) 


= coordenadas en pantalla del cam- 
po de introducción 


= coordenadas en pantalla descrip- 
ción 

= matriz numérica que tiene los có- 
digos ASCII de teclas comandos 

= descripciones en máscaras vídeo 

=voces del menú principal 

= blank 

= punto decimal 

= carácter "—”. Identifica los campos 
de introducción alfanuméricos 

=carácter “st”. Identifica los cam- 
pos de introducción numéricos 

=número de campos introducción 
en máscara vídeo activada 

M3 = máximas lecciones 

SS$(M3,4) = datos para la creación de los spri- 
tes 

= nombres de las figuras 


NO$(M3) 
PAR$ 
(M3) = parámetros de las figuras 
DOM$ 

(M3) = preguntas 

CAL$ 

(M3) = fórmulas de cálculo 


NO$(0) = puntero a última lección 
P5 = val (NO$(0)) 

BM$ 

BP$ = señales sonoras 

BB$ 
CM$(4) 
RS(«) 


=4 Operadores aritméticos 
= respuestas del usuario 
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Geografía 


También en esta materia, el estudio y la comprobación 
de la preparación pueden ser asistidos por el ordena- 
dor. Una vez más, su capacidad de memorización, 
sus posibilidades gráficas y su velocidad de proceso 
se aprovechan para seguir al niño, ayudándolo en sus 
estudios. 

El programa de Geografía puede adaptarse a cual- 
quier tema inherente a la materia, y permite preparar 
«lecciones» a varios niveles de complejidad. Las pre- 
guntas van acompañadas de un dibujo que ilustra el 


Uso del programa 


El software está dividido en dos programas completa- 
mente separados; el primero está dedicado a la pre- 
paración de las preguntas y el segundo, utilizando los 
datos anteriores, plantea las preguntas y comprueba 
las respuestas. 

La preparación de las preguntas empieza con la defi- 
nición del tema y de la palabra clave en el interior del 
tema. Con esta estructura se dispone de una amplia 
gama de aplicaciones, puesto que un mismo tema 
puede desarrollarse con varios apartados (campos 
Clave). Por ejemplo, el tema España puede contener 
los apartados Ciudades, Ríos, Montes, etc., dando lu- 
gar a una notable variedad de preguntas. 

En la segunda foto de la página 2229 se ha represen- 
tado la máscara que aparece al activar el programa de 
generación. Los datos a proporcionar son los dos an- 
teriores (tema y clave), teniendo en cuenta que para 
cada tema y cada clave debe cambiarse el nombre 
del fichero o utilizar otro soporte (cinta o disco). La pre- 
gunta que deberá presentarse se divide en tres partes 
principales: 


1 / Dibujo: con un sprite o un dibujo en alta resolución 
se presenta gráficamente el tema, por ejemplo la 
silueta esquematizada de una región. 

2 / Texto: algunos campos (5) se utilizan para especifi- 
car cada pregunta prevista. 

3 / Respuestas: es posible un total de 20 respuestas. 


En la fase de generación de las preguntas, las tres 
partes se crean una después de otra utilizando las 
máscaras representadas en la página 2230. 

En la primera se muestra la generación del sprite que 
deberá presentar el tema de las preguntas. Por ejem- 
plo, utilizando en la generación los datos indicados en 
la segunda foto de la página 2229 se crea una serie de 
preguntas cuyo título será España (tema) y el apartado 
las regiones (campo clave Regiones). Después de es- 
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tema y prevén un procedimiento de ayuda mediante el 
cual, introduciendo la palabra Ayuda, el ordenador su- 
giere la respuesta. 

Al final de cada lección se presenta la «puntuación» 
que especifica cuántas han sido las respuestas co- 
rrectas y cuántas veces se ha pedido ayuda. El proce- 
dimiento está estructurado de manera que ofrezca la 
máxima libertad en la definición de las preguntas y, 
por tanto, puede utilizarse en distintos órdenes de es- 
tudios, a partir de los elementales. 


ta elección y de haber creado el sprite, se pasa a defi- 
nir cada una de las descripciones que constituirán la 
máscara. 

La última fase es la introducción de las respuestas con 
la máscara indicada en la tercera foto de la página 
2230. Las descripciones introducidas anteriormente se 
han representado en la plantilla, y a su lado hay la zo- 
na para introducir los datos. En el ejemplo, la máscara 
contendrá las leyendas: Región, Habitantes, Recur- 
sos, etc., y al lado de cada una deben introducirse las 
respuestas que le corresponden. 

Por ejemplo, un primer grupo de datos podría corres- 
ponder a Navarra, por lo que se tendría la máscara de 
la tercera foto de la página 2231; cambiando la región 
se obtiene una máscara con las mismas descripciones 
anteriores, a las que el usuario debe asociar las nue- 
vas respuestas. 

En general, las descripciones pueden variarse pasan- 
do de uno a otro dato. En el ejemplo anterior, el primer 
grupo introducido, correspondiente a Navarra, conte- 
nía las descripciones Región, Habitantes, Recursos, 
Capital. En el grupo de datos siguiente, el programa 
acepta variaciones de los mismos, por lo que tratando 
por ejemplo Cuenca, el campo Recursos puede susti- 
tuirse por el Ríos o el Montes, haciendo más variado el 
desarrollo. El único campo que debe permanecer co- 
mún para todos los datos de un determinado tema es 
el campo clave, presentado en la primera línea de las 
preguntas. 

Esta estructura permite utilizar el programa para una 
amplia gama de aplicaciones, porque el significado 
de cada pregunta no está predefinido ni es fijo en el 
ámbito de cada tema, pudiendo alcanzar con gran fa- 
cilidad cualquier grado de detalle. Por ejemplo, de las 
preguntas correspondientes a las regiones puede pa- 
sarse a examinar las ciudades principales de cada re- 
gión, por lo que el dato que en el primer grupo era la 
Clave (o sea la región) puede convertirse en el propio 


tema, dando lugar a una nueva serie de preguntas, de 
mayor profundidad que las anteriores, sobre dicha re- 
gión. En este caso, el programa clave podría ser una 
ciudad, los montes o los ríos. Por tanto, el programa 
puede permitir la preparación de un verdadero curso 
que, partiendo de un nivel de síntesis, se desarrolle 
con un detalle creciente. 

Por ejemplo, un primer nivel puede estar constituido 
por Europa con preguntas sobre las naciones; el si- 
guiente nivel podrá contener un primer detalle de cada 
nación, y de él podrán preverse secciones inferiores 
con preguntas sobre cada nación, como por ejemplo 
las regiones o las ciudades. 

Análogamente, puede cambiarse el tema pasando, 
por ejemplo, a la geografía gastronómica. 
Resumiendo, el programa no está vinculado a ninguna 
disciplina en particular, y basta con respetar algunas 
reglas impuestas por la estructura lógica para poderlo 
aplicar a los temas más variados, incluso diferentes de 
la geografía. 

En las aplicaciones deben tenerse presentes los si- 
guientes vínculos: 


" el campo clave es único para todas las preguntas. 
Por ejemplo, con las máscaras anteriores, el pro- 


Menú general. En la foto se presenta la pantalla 
principal que se obtiene al activar el programa 
Geografía. Mediante este menú es posible cargar 
en la memoria los dos programas que constituyen 
el procedimiento, uno de generación y otro para el 
desarrollo de las pruebas. 


Generación. La primera función a desarrollar es la 
Generación de los archivos que constituyen el material 
de las preguntas. El programa prevé una primera 
introducción del título y de la clave para cada lección. 
Estos dos parámetros son comunes a todos los 
ejercicios introducidos, y representan las 
características fundamentales del diskette datos 
utilizado: en este caso, el soporte magnético contiene 
lecciones correspondientes a España 


grama siempre presentará preguntas sobre regio- 
nes del país considerado 

E todos los demás campos son completamente defi- 
nibles por el usuario y están divididos en 4 pregun- 
tas. 


Entre las preguntas definibles por el usuario: 


= la primera admite una sola respuesta (segunda lí- 
nea de la máscara, Habitantes) y, por tanto, deberá 
estar estructurada para preguntas que no permitan 
más de una respuesta válida 

" la segunda (línea 3, Recursos) solicita cinco res- 
puestas 

" la tercera (línea 4, Capital), evidentemente admite 
una sola respuesta 

m la última pregunta permite un máximo de doce res- 
puestas. 


Completada la generación de los datos, puede pasar- 
se a su uso. El programa lee la palabra clave (Región) 
y la presenta, invitando al usuario a seleccionar la re- 
gión sobre la que desea las preguntas. Después de 
esta sección aparece la máscara que permite introdu- 
cir y comprobar las respuestas. 


| GEOGRAFIA | 
INTRODUCIR EL NUMERO CORRESPONDIENTE 
AL PROGRAMA DESEADO 


) GENERACION DE LOS ARCHIVOS 
DESARROLLO LECCIONES 
2 FIN DE TAREA 


2229 


La introducción de las lecciones prevé en primer lugar 

la creación de la figura que ilustrará la lección (en este 

caso se ha dibujado el perfil de una región española). 

Los comandos a utilizar son: 

(1) CRSR UP : desplaza el cursor 1 posición arriba 

(1) CRSR DOWN: desplaza el cursor 1 posición abajo 

(>) CRSR RIGHT: desplaza el cursor 1 posición a la 
derecha 

(-) CRSR LEFT  : desplaza el cursor 1 posición a la 

izquierda 

enciende el punto en que hay el cursor 

apaga el punto en que hay el cursor 

introduce la figura 


Z2>m 


En este punto se presentan cinco preguntas 
pertenecientes a la lección que se está construyendo. 
La primera se escribe automáticamente y no se puede 
variar (corresponde al campo clave, común a todas las 
lecciones) y las otras las decide el usuario. En este caso 
se ha elegido el tema Regiones como campo clave de 
las lecciones. 


En esta foto se ha representado la presentación final de 
la introducción de lecciones. Pueden verse las cinco 
preguntas y el dibujo ilustrativo introducidos 
anteriormente. Ahora el usuario debe introducir las 
respuestas correctas previstas para esta lección. Este 
formato vídeo se utilizará después durante el desarrollo 
de las lecciones para permitir que el niño introduzca las 
respuestas. 


Al final de la introducción de una lección se pregunta 
al usuario si desea introducir otra lección o no. En este 
último caso se actualizará el puntero del fichero datos 
y el programa terminará. 
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Desarrollo lecciones. Apenas activado, el programa 
de desarrollo lecciones pide la introducción del diskette 
que contiene los datos y del que se leerá el tema tratado 
en las lecciones. En esta foto se ha representado la 
máscara vídeo que informa al usuario sobre el 
contenido de las lecciones: ahora puede decidir si 
responde o no a las preguntas introducidas en dicho 
soporte magnético. 


Siguiendo con el desarrollo de las lecciones, el niño 
tendrá que especificar sobre qué cuestionario desea 
ser interrogado. Este paso ya representa una forma de 
interrogación, porque al ir a buscar el fichero de la 
lección pedida, el programa examinará el conocimiento 
a nivel general del tema. En este caso (lecciones sobre 
regiones españolas), el niño ha realizado una petición 
correcta, porque el nombre “navarra” corresponde a 
una lección efectivamente introducida. 


Una vez identificada la lección entre las que hay en el 
disco datos, se presenta la máscara vídeo en la que 
el niño deberá introducir las respuestas. El nombre 
“navarra” representa el título de la lección, por lo que 
el programa lo escribe automáticamente. 


El niño ha empezado a introducir las respuestas. El 
cursor está representado por un interrogante que 
parpadea: las palabras más cortas de 10 letras pueden 
introducirse con la tecla RETURN, las respuestas de 10 
letras se introducen automáticamente al introducir la 
última letra. 
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Las respuestas correctas permanecen en pantalla de la 
misma manera en que se han escrito. Los errores se 
presentan mediante un mensaje visual en la misma 
posición en que se han productido. Esta máscara vídeo 
no prevé ayuda porque no está gestionada por la data 
entry, y consiste solamente en la introducción de 
palabras de una longitud máxima de diez caracteres. 


Durante el desarrollo de las lecciones se ha previsto 
una posible ayuda del ordenador en el caso de que el 
niño no conozca una de las respuestas. 

Al escribir la palabra “ayuda” en el espacio reservado a 
la eventual respuesta ignorada, ésta se presentará y el 
cursor se desplazará al campo de la siguiente 
pregunta. 


En este caso se ha pedido una ayuda para la pregunta 
Capital, y el ordenador ha presentado la respuesta ; ni num 
correspondiente. Ahora el niño está introduciendo la | j CPOGRAFÍA (uso)! 

última respuesta prevista. A 


Una vez terminada la fase de introducción de las 
respuestas, el programa está preparado para indicar 
el recuento. Se ha previsto una espera antes de hacer 
desaparecer la pantalla de las respuestas. 
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En la foto se ha presentado la pantalla final del 
programa de desarrollo lecciones. En ella, el ordenador 
presenta los resultados obtenidos por el niño en la 
lección acabada de desarrollar. Se presentan tres 
totales diferentes: las respuestas correctas, las 
erróneas y el número de ayudas pedidas. Después 
se pregunta al niño si desea desarrollar otra lección. 


Edicion Un 


LS 


GEOGRAFIA (uso) 


En el programa de desarrollo lecciones es necesario 
indicar la manera en que el niño debe pedir las Voz 1 JAR: Ed, ] 
lecciones, cuyo título debe escribirse de la misma IA ECOGRAFÍA Cusos 
manera que se ha introducido en la Generación. Por _——mm_mm— 

ejemplo, en el caso de regiones de España, se pide el 


nombre “Valencia”. 


'TFPogunta Vversaran 0Obr 


El programa detecta el error, constituido por la primera 
letra del nombre escrita en mayúscula (en la 
Generación se ha introducido en minúscula), y lo indica. 


Generación. Con el programa de Generación de las 
preguntas para el procedimiento Geografía puede 
crearse un número ilimitado de grupos de lecciones, 
cada una correspondiente a un tema o a un subtema 
diferente. Esta variedad de cuestionarios se obtiene 
sustituyendo el soporte magnético en el que hay 
grabados los datos. De esta manera puede constituirse 
una gran biblioteca de datos. Por ejemplo, en la foto se 
ha generado un archivo de datos referido a 
Norteamérica, correspondiente al tema Lagos. 
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La lógica del programa 


El programa, en su uso completo, debe gestionar un 
conjunto de datos con las posibilidades de introducir 
un dibujo, modificar las descripciones de los campos 
y evaluar las respuestas dadas. 

Cada grupo de datos deberá tener un registro (o va- 
rios) dividido en tres partes: Respuestas, Descripcio- 
nes y Dibujo. 

La estructura utilizada se ha esquematizado en el grá- 
fico de la página 2235. El fichero datos está dividido en 
grupos lógicos, cada uno de 6 registros (excepto en el 
Apple, que necesita más registros para el dibujo). Los 
primeros 4 contienen las respuestas, el 5.* las descrip- 
ciones, y el último (los últimos 10 en el Apple), los da- 
tos necesarios para crear el sprite. Normalmente, el 
primer registro está reservado a los datos de servicio. 
En particular, contiene: 


" número del último registro introducido: cada grupo 
de datos (al que le corresponde una máscara) está 
numerado progresivamente. Este valor se memori- 
za en el registro 1 (bytes 1 y 2) del fichero 

"m descripción del campo clave: es la descripción que 
aparece en la primera línea de cada máscara y 
cuyo contenido identifica el apartado elegido en el 
ámbito del tema contenido en el fichero 

m título: constituido por 10 caracteres, tiene la única 
finalidad de comprobación para asegurar que el 
soporte utilizado (disco o cinta) contiene el tema 
deseado. 


En el mismo gráfico también se han representado los 
punteros para identificar en el conjunto de los registros 
presentados los que se refieren a un determinado gru- 
po de datos. Como cada grupo ocupa 6 registros (15 
en el Apple), debe procederse con estos pasos y, por 
tanto, el principio de un grupo general «N» está des- 
pués de un número de registros a partir del principio 
del fichero, igual al número de grupos que lo preceden 
multiplicado por 6 (15 en el Apple). A este valor debe 
sumársele 2, porque el primer bloque de datos empie- 
za en este registro. 

Como se ha indicado antes, la introducción de los da- 
tos se realiza en tres fases sucesivas para cada apar- 
tado, empezando por el sprite y terminando por las 
respuestas. 

En los gráficos de las páginas 2236 y 2237 se ha re- 
presentado el diagrama de principio del programa de 
generación. Para interpretar correctamente dicho dia- 
grama hay que consultar los esquemas de máscaras 
representados en la página 2230. 

El diagrama no presenta dificultades de interpretación, 
y sólo hay que especificar que su particular estructura 
deriva de la elección de utilizar la misma lógica tanto 
para la versión cinta como para la de disco. En parti- 
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cular, todos los datos relativos a un cierto tema deber 
introducirse uno después de otro. 

Una segunda particularidad consiste en haber fijadc 
previamente por programa el nombre del fichero, por 
lo que para cambiar de tema se necesita un nuevo 
soporte físico. 

Este inconveniente, irrevelante para la versión cinta (el 
coste de una cinta no es alto), puede eliminarse en la 
versión disco introduciendo en la primera máscara la 
petición del nombre del fichero o utilizando para el 
nombre los primeros caracteres de la descripción. De 
esta manera, en el mismo diskette pueden coexistir va- 
rios grupos de datos. 

Una segunda implantación, siempre correspondiente 
a la versión disco, puede consistir en prever un proce- 
dimiento para corregir los datos introducidos. 
Finalmente, hay que tener en cuenta que no se ha es- 
pecificado el formato de memorización ni cómo se han 
construido. En los diagramas, sólo se ha esquematiza- 
do el tema porque depende demasiado del tipo de 
máquina y no permite un tratamiento generalizado. Sin 
embargo, deben consultarse los correspondientes lis- 
tados. 

Una situación a tener presente es que los bytes dispo- 
nibles para la memorización del sprite pueden no ser 
suficientes, aunque este inconveniente puede obviar- 
se variando la longitud de los registros o el número de 
éstos dedicados al sprite. 

El programa está completamente separado del que 
permite utilizar los datos para comprobar la prepara- 
ción del niño; el único parámetro común a ambos es el 
formato del fichero. 

En el gráfico de abajo de la página 2237 se ha repre- 
sentado el diagrama del segundo programa (utiliza- 
ción) que, como puede verse, está estructurado en só- 
lo 4 subrutinas, porque debe realizar pocas funciones. 
En la activación es necesario pedir el tema y el aparta- 
do dentro del tema. Entonces, el programa empieza 
con una subrutina (14000) que lee el primer registro 
del fichero datos, presenta el tema contenido en éste 
(descripción) y espera la introducción del valor y de la 
palabra clave. El diagrama de esta subrutina se ha re- 
presentado en el gráfico de la página 2238. 

Según el valor introducido (por ejemplo ANDALUCIA), 
el programa busca, con la subrutina 8000, el grupo de 
datos correspondiente. Si este valor no se encuentra 
en ningún grupo, indica el error y pide una nueva intro- 
ducción. Si no es así, lee los datos, tanto si son de las 
preguntas (descripción, en D$(«*)) como de las res- 
puestas (en B$(«)) y presenta la máscara vídeo (sub- 
rutina 16000), naturalmente sin que aparezcan las res- 
puestas. 

La última función, realizada por la subrutina 15000, es 
la introducción de las respuestas y su comprobación. 
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INTRODUCCION DATOS 


Utilizando este programa 

antes hay que preparar todos 
los datos a introducir, porque 
no son posibles correcciones 
ni adiciones. Para cada tema 
debe utilizarse un soporte 
diferente (cinta o disco), o bien 


el El diagrama se rroll 
modificar el programa para A Sm ud 
Le ld el nombre del indicación de las 
archivo. subrutinas necesarias porque 
son idénticas a las utilizadas 


en las data entry anteriores 


Transfiere el registro 1 al fichero. 
Para la versión cinta en un 
fichero separado. En TT se pone 
el valor 1 y, en UG (último 
grupo), el valor 0. 


En la versión Apple, O Los datos se transfieren 
los dibujos se introducen a SP5(x) 

al final de las 

preguntas 


Para las descripciones no puede Los 5 campos de descripción (D$(+)) 


utilizarse la matriz D$(*), porque se tratan como datos y 


ya está prevista en la data entry se introducen con una 
data entry normal. 


Durante la introducción 
están en B$(x); al final 
se transfieren a S1$() 


De esta manera se crean 
las descripciones para la 
siguiente máscara 


Es una data entry normal en la que 
las descripciones se han 
introducido anteriormente y 

los datos son las respuestas. 
B$(1) se pone igual al 

campo clave introducido 

en la primera máscara 


Transfiere B$(20) al fichero en 
y 4 registros 
TT es el puntero al registro, T1T=TT1+1 TT + 1 con B$(1) ... BS(5 
Lo lo que siempre BS(x) al TT + 2 con B$(6) .. BS 
ebe incrementarse fichero, reg. TT TT + 3 con B$(11) ... BS 


10) 
y 
TT + 4 con B3(16) ... B$(2 


) 
0 
5) 
0) 


Transfiere las Jescripciones 


TT=TT+1 
S15(+*) al fichero 


TT =TT+1 Transfiere el sprite 


SPS(+) al fichero 


UG = UG + 1 Ultimo grupo transferido 
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Para la cinta, 

el segundo fichero 
es el que hace de 
directorio para el 
fichero DATOS 


en el registro 1 


PRESENTACION PREGUNTAS Y GESTION RESPUESTAS 


Pregunta el campo clave en base 
al cual seleccionar los datos 

Por ejemplo, introduciendo 
“Albacete”, se presentarán 

las preguntas correspondientes 

a esta región (esta función 

se presenta con detalle 

en el siguiente diagrama) 


En el fichero busca el grupo de datos 
que tiene el campo clave pedido 


Carga los registros del grupo 
datos correspondiente a la clave 
seleccionada, cada uno en 

su propia matriz 


Construye la pantalla vídeo 
en la que se introducirán 
las respuestas 


Lectura de las respuestas 
y comprobación de si son 
correctas o están completas 
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SELECCION TEMA 


En la variable KS se ha puesto 
el valor (numérico) de 

los bytes 1 y 2. 

KS se utilizará en la subrutina 
de búsqueda (8000) 


El fichero tiene el nombre 
DATOS, y el tema que contiene 
está descrito en el registro 1 (**) 


El tema Geografía puede 

realizarse en diferentes ficheros 
DATOS. La máscara anterior 
muestra el título (p. e. NACIONES 
EUROPEAS) para poder comprobar 
si se ha utilizado el deseado 


(*) El valor a introducir en el campo clave (que se utilizará después en la búsqueda) podría ser más 
corto que los 10 bytes previstos, por lo que la subrutina lo completa con espacios (a la derecha) 
Por ejemplo, introduciendo LEON, la cadena CV$ deberá completarse con 6 espacios 


(**) Para la versión cinta, estos datos están en un fichero separado, mientras que el primer registro 


del fichero DATOS está en blanco 


Introducción de datos. En las páginas 2236 y 2237 se 
ha representado el diagrama de principio de genera- 
ción. En esta versión no se ha previsto la corrección de 
los datos introducidos, por lo que antes de empezar 
esta fase es conveniente analizarlos atentamente para 
evitar errores, los cuales obligarían a rehacer comple- 
tamente todo el trabajo. 

Efectivamente, en caso de error de introducción, será 
necesario rehacer completamente los datos porque en 
el programa no se ha previsto su actualización. 

Esta solución se ha adoptado teniendo en cuenta la 
complejidad de los datos a introducir, de modo que se 
necesite una particular atención y aplicación en su 
preparación, con lo que se evita una gran parte de las 
causas de error. 

Partiendo de esta base, es conveniente eliminar la fun- 
ción de actualización que, debido a la presencia de 
los sprites, resultaría particularmente compleja desde 
el punto de vista de la programación. 

La primera máscara permite introducir el título del 
campo clave (como descripción) y transfiere los datos 
al registro 1 del fichero (directorio). 

Recuérdese que el título se utiliza sólo al principio para 
comprobar que el soporte (disco o cinta) sea el ade- 
cuado, mientras que el campo clave se presenta en 
cada pregunta. 

Sigue la generación del sprite que ilustra el tema (ob- 
tenida con las rutinas ya descritas), excepto en la ver- 
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sión Apple, que prevé la construcción del dibujo al fi- 
nal de todas las demás funciones. 

A continuación se introducen las descripciones y los 
datos: las primeras constituirán el texto de las pregun- 
tas, mientras que los datos son las respuestas que se 
compararán en la fase de utilización con las dadas por 
el usuario. Los valores (alfanuméricos) así introducidos 
se transfieren al fichero según varios formatos, que de- 
penden de la versión. El programa es simplemente un 
empleo diferente de la data entry y no presenta dificul- 
tades particulares. 


Presentación preguntas y gestión respuestas. El 
diagrama muestra el programa de selección del tema 
(campo clave), presentación y comprobación de las 
respuestas. 

Como se ha indicado antes, los datos se identifican 
con dos parámetros: el rótulo y el campo clave. El título 
es común a todos los registros lógicos del fichero, y 
puede utilizarse únicamente como elemento de con- 
trol, mientras que el campo clave está ligado a un gru- 
po de datos (que representa un registro lógico) y 
constituye su identificación. 

La primera es la petición de introducción del campo 
Clave, o sea del tema sobre el que se desean las pre- 
guntas (los detalles de esta función se ilustran en el 
gráfico de la pág. 2238. En base a este valor (cadena), 
la subrutina 8000 selecciona el grupo de registros (físi- 


cos) correspondiente. En caso de error, o sea si en el 
fichero no hay el valor pedido, se activa un flag que 
produce la emisión de un mensaje y pide que se for- 
mule de nuevo la pregunta. 

En caso de resultado positivo (campo clave hallado), 
el registro (lógico) se carga en memoria con la subruti- 
na 14000, se presenta la máscara (subrutina 16000) y 
se leen y comprueban las respuestas dadas por el 
usuario (subrutina 15000). 

Al final, el programa pregunta si se desea continuar y, 
en caso de respuesta afirmativa, empieza un nuevo 
«run» idéntico al anterior. En el gráfico de las páginas 
anteriores se ha mostrado con detalle el desarrollo del 
diálogo inicial para la selección del tema deseado (en 
el diagrama anterior, el conjunto se ha resumido en un 
solo bloque funcional). La gestión del fichero datos es 
análoga, aunque algo más compleja, a la utilizada en 
los otros programas. Efectivamente, entre otros, el re- 
gistro 1 contiene el número progresivo del último dato 
introducido o la longitud lógica del fichero. Este valor 
se transfiere a una variable (indicada con KS en el dia- 
grama) y se utiliza como final del bucle de búsqueda 
del campo clave seleccionado. Sigue la presentación 
del título y de la descripción del campo clave. 

Esto es necesario porque bajo un mismo título pueden 
memorizarse varios conjuntos de datos, cada uno con 
una clave diferente. 

Hay que recordar siempre la estructura completamen- 
te configurable del programa, lo que si por una parte 
aumenta sus posibilidades de aplicación, por otro lo 
obliga a una mayor estructuración durante la introduc- 
ción de las preguntas. Sin embargo, esta característi- 
ca hace que el programa pueda utilizarse para cual- 
quier aplicación basada en una serie de preguntas in- 
herentes a cualquier tema (campo clave) y, por tanto, 
no está confinado a la Geografía. 

La función de selección del tema termina con la intro- 
ducción de la cadena que constituye el valor a buscar 
(en el primer campo de cada registro lógico). Para es- 
ta introducción no basta un sencillo INPUT, sino que 
es necesaria una lógica que conserve inalterada la 
longitud prevista, incluso si el número de caracteres es 
menor. 

Esto es necesario porque el valor se utilizará como ele- 
mento de comparación durante la selección, por lo 
que debe tener una longitud igual a la prevista en el 
fichero. Esta condición puede ser respetada de dos 
maneras: utilizando la data entry, que sin otra indica- 
ción que la longitud (en número de caracteres) proce- 
de a formar el campo, o bien completando la cadena 
introducida con tantos espacios como sean necesa- 
rios para obtener la longitud prevista (10 bytes). 

El control descrito no asegura la validez del dato intro- 
ducido, y en particular no prevé ningún control sobre 
la existencia de sinónimos. Por ejemplo, los datos po- 
drían haberse generado con la palabra clave «Mon- 
tes», mientras que el usuario podría buscar «Monta- 
ñas» sin encontrar el tema. Este defecto no puede ob- 


viarse de manera sencilla, y constituye uno de los pro- 
blemas de solución más compleja en la gestión de los 
Bancos de Datos. 

La mejor solución consiste en crear una tabla de sinó- 
nimos en la que se agrupan todos los vocablos que, al 
final de la búsqueda, indiquen el mismo tema. En este 
programa, por motivos de sencillez y de ocupación de 
memoria, no se ha previsto esta implantación. El usua- 
rio puede activarla generando un fichero separado 
que contenga, en cada registro, una palabra clave y 
sus sinónimos. 

En la fase de búsqueda debe modificarse la lógica in- 
troduciendo un bucle que compare el valor introduci- 
do con todos los sinónimos presentes. Al producirse 
una igualdad debe activarse un flag que, a la salida de 
la rutina, indique que se ha producido un resultado 
positivo. 

Si bien esta lógica no presenta diicultades particulares 
de programación, no es sencilla de funcionamiento, 
puesto que se requiere una notable cantidad de me- 
moria para poder contener todo el fichero de sinóni- 
mos, o bien hace más lenta la ejecución del programa 
debido a los continuos accesos al disco. 

Otra solución, que no requiere ninguna implantación, 
consiste en duplicar todos los datos para cada posible 
sinónimo. Por ejemplo, para los vocablos «Montes» y 
«Montañas» basta generar dos registros lógicos ideí- 
ticos de contenido, excepto la palabra clave. Sin em- 
bargo, esta solución implica un derroche de espacio 
en el soporte magnético y, por tanto, sólo es aplicable 
en los casos en que los sinónimos son pocos, como en 
Geografía. 

Sin embargo, en las versiones disco, esta solución sólo 
implica una mayor ocupación de memoria de masa, 
que no suele ser significativa, mientras que en la ver- 
sión cinta puede ser inaplicable, ya que necesita un 
correspondiente aumento de la memoria de máquina, 
reduciendo sensiblemente el número máximo de datos 
para cada tema. 


Búsqueda del campo clave. La subrutina 8000 reali- 
za la búsqueda del grupo de datos que tiene como 
clave el valor introducido por el usuario. 

Su desarrollo se reduce a un bucle de lectura de dis- 
co, a la extracción del contenido de los bytes corres- 
pondientes al campo clave y a su comparación con el 
valor introducido. En la entrada hay que proporcionar 
a la variable KE el número máximo de registros (o sea 
el número del último registro escrito, cuyo valor se ob- 
tiene a través del contenido del directorio del fichero) y 
el parámetro K. 

Como se muestra en el gráfico de la página 2235, la 
estructura de los ficheros no es igual para todas las 
versiones. Un registro lógico está constituido por diver- 
sos registros físicos, cuyo número depende del tipo de 
gráfico implantado en la máquina particular. Efectiva- 
mente, las tres máquinas difieren sustancialmente en 
este aspecto. En los sistemas C-64 y MSX existe una 
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BUSQUEDA CAMPO CLAVE 


Los campos clave 
de los distintos 
grupos datos están 
a una distancia 

de K registros 
entre sí (*) 


El campo clave 
pedido no está. 
Se activa el flag 
de error que se 
utilizará en 

el main 


(*) En el Apple se tiene K = 15 


Predispone los extremos 

de bucle de lectura datos 
KE y el último registro útil: 
(KE = 2 + Kx*(KS-— 1) (*) 


Principio bucle 


El contenido del registro 
se pone en AA$ 


Extrae el campo 
clave 


Comprueba si es el 
seleccionado (p.e. LEON) 


En el C-64 se tiene K = 7 (mientras que es 8 en escritura) 
En el Philips se tiene K = 1, porque la búsqueda se hace en TT$(*, 1) 


(**) En el Philips, este bloque está sustituido por AA$ = TTS(1,1), porque los datos leídos de la cinta 
se transfieren directamente a TT$(M3,5), donde M3 es el número máximo de lecciones memorizables 


buena gestión de los sprites, por lo que el dibujo se 
obtiene con este método, mientras que en el sistema 
DOS es necesario utilizar la alta resolución, incluso si- 
mulando los sprites, con el consiguiente aumento de la 
ocupación del disco. 

Esta situación hace que el número de registros físicos, 
que constituyen un registro lógico, varíe en función de 
la versión. El parámetro K representa este valor y pro- 
porciona el «paso» con el que deben leerse los regis- 
tros del fichero para extraer de cada grupo de datos la 
correspondiente clave. Los valores utilizados en las 
tres versiones se indican en el gráfico de arriba. 
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Aparte de esta parametrización, la subrutina no pre- 
senta otras particularidades porque, dado el limitado 
número de registros (lógicos) que debe controlar, está 
estructurada sin tener en cuenta los tiempos de proce- 
so necesarios. 

El contenido del fichero se examina secuencialmente 
hasta el primer registro en el que el campo clave tiene 
valor deseado, o hasta el último registro escrito. 

En ciertas condiciones, este método puede emplear 
un tiempo excesivo, por lo que al aumentar notable- 
mente la longitud del fichero datos es útil prever una 
búsqueda de tipo binario, que sin embargo implica la 


necesidad de ordenar el fichero datos según el conte- 
nido del campo clave. 

Estas funciones se ilustrarán con detalle en el progra- 
ma de la Base de Datos. 

El diagrama ilustra los puntos más significativos de es- 
ta rutina. Dada la particular estructura de los datos (ver 
formato registro), su lectura del disco o de la cinta pre- 
senta una lógica muy diferente a la utilizada en los 
otros programas. 

Observando el gráfico de la página 2235 puede verse 
que se necesitan varios punteros para identificar y ex- 
traer cada grupo de datos. El primero, utilizado en las 
subrutinas anteriores, identifica el grupo de datos inhe- 
rentes al tema seleccionado, y permite la lectura y la 
carga en la cadena AAS$ del contenido de los registros 
correspondientes (de 2 a 7, 8 a 13, etc.), mientras que 
los punteros utilizados en la 14000 sirven para «de- 
sempaquetar» la cadena y para atribuir a cada uno de 
los elementos de B$(«w) y D$(w) el valor correcto. 
Siempre haciendo referencia a la figura de la página 
2235 (formato del fichero), es evidente que cada uno 
de los registros físicos que componen un registro lógi- 
co debe asignarse a un grupo particular de variables. 
La estructura de los datos puede dividirse en dos par- 
tes: la primera contiene las respuestas que el usuario 
deberá dar y las descripciones que la máquina deberá 
presentar en la máscara vídeo; la segunda (los regis- 
tros de 6 a K) contiene los datos correspondientes al 
dibujo. La parte descriptiva, constituida por los 5 pri- 
meros registros, tiene un formato idéntico para todas 
las versiones, mientras que los registros que contienen 
los sprites o los datos para el dibujo en alta resolución 
tienen un formato que depende de la versión. 

En el gráfico de la página siguiente se ilustra el flujo de 
la lectura de la parte alfanumérica, y para el dibujo hay 
que consultar los listados (subrutina 30100). 

La parte alfanumérica de los datos, a su vez, está divi- 
dida en dos zonas. La primera, de 4 registros, contie- 
ne las respuestas y debe memorizarse en la matriz 
BS(+); la otra, de un solo registro, contiene las descrip- 
ciones y debe transferirse a D$(x). 

La primera parte, lectura de B$(«), se desarrolla en el 
bucle con índice |, y la segunda, correspondiente a 
D$(«), está constituida por el último bucle indicado en 
la misma figura (índice J). 

En el primer bucle se incluye el cálculo del puntero J1 
que identifica el primer elemento de la matriz B$(«). 
De hecho, como el paso de un registro a otro es 5, en 
lectura, el elemento de B$(x) en que se inicia la trans- 
ferencia depende del valor de |. Por ejemplo, al primer 
registro (l= 1) debe transferirse empezando por 
B$(1), mientras que en el registro 4(1 = 4), los elemen- 
tos a utilizar empiezan en B$(16). 

El «apuntado» correcto se realiza calculando J1, valor 
inicial, y desarrollando un bucle entre J1 y J1 + 4 (en 
cada registro hay 5 elementos). Al final de este bucle 
puede incrementarse el puntero | y seleccionarse otro 
grupo de respuestas. 


Obsérvese que la lectura de los datos sigue al desem- 
paquetado porque el primer registro del grupo se lee 
antes que la llamada a la subrutina 14000. 

Por tanto, en la entrada, la variable AA$ contiene los 
datos correspondientes al primer registro. Sin embar- 
go, el bucle se ejecuta hasta | = 4, porque la última 
lectura es necesaria para cargar el registro 5 de las 
descripciones. 

Obsérvese que el bucle más exterior, índice |, también 
debe incrementar el puntero K1. En la llamada, este 
puntero se implanta igual al número del registro que 
contiene la palabra clave seleccionada, y la lectura 
debe empezar desde éste. Por tanto, los valores nu- 
méricos de los punteros a los registros siempre se re- 
fieren a K1. 

La necesidad de la utilización de este puntero también 
es causa de la forma poco usual de la subrutina. Por 
necesidades de búsqueda de los datos, antes de lla- 
marla es necesario un bucle sobre el fichero que se- 
leccione el registro lógico a utilizar. Esta selección sólo 
puede realizarse leyendo el primer registro físico de 
cada grupo, y por este motivo, cuando la 14000 llama 
la variable AAS$, ya contiene los primeros datos del pri- 
mer grupo (campo clave y primeras 4 respuestas) y la 
subrutina debe empezar con el desempaquetado, 
mientras que la lectura del registro insertada al final del 
bucle sirve para adquirir los datos a utilizar en el «ci- 
clo» siguiente. 

De esta lógica resulta que en la salida del bucle se ha 
realizado una lectura de más, o sea se han cargado 
los datos correspondientes al último registro físico (los 
que deben transferirse a D$(w)), por lo que puede acti- 
varse el bucle de transferencia sin ninguna lectura. 
Una última particularidad está en el modo utilizado pa- 
ra extraer los distintos campos. Como todos tienen una 
longitud de 10, no es necesario definir asignaciones, 
sino que basta con un bucle sobre los caracteres de la 
cadena AA$ que extraiga (con la instrucción MID$) 
grupos de 10, a partir de 1, 11, etc. 


Presentación de la máscara. La subrutina empieza 
con la presentación de la figura (30200) a partir de las 
coordenadas 1,1. El diagrama correspondiente a esta 
parte no se ha representado, puesto que depende 
mucho de la versión y, por tanto, debe consultarse el 
listado específico. 

Terminada la presentación de la figura, empieza la 
preparación de la pantalla. Esta función está dividida 
en dos partes: en la primera se presentan las líneas de 
tipo «mixto», o sea las que contienen también algunas 
descripciones, y en la segunda sólo se presentan los 
trazos sobre los que el usuario deberá introducir sus 
respuestas. Esta segunda parte, correspondiente a la 
zona inferior de la máscara, no se ha representado 
porque es completamente análoga a la anterior. 

La subrutina se reduce a una serie de bucles de posi- 
cionado y de escritura, el primero con D$(+), corres- 
pondiente a los campos con descripción, y el otro sólo 
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LECTURA DATOS 


Bucle de lectura registros respuestas (B$(+)) 


Bucle de desempaquetado registro 


Atención, el bucle 
sobre los registros (Il) no 
conviene ejecutarlo con 
la instrucción FOR... 


Extracción 
descripciones: 
5 campos de 
10 caracteres 


En la versión cinta (MSX), 

esta subrutina se ejecuta de 
manera diferente (ver listado), 
porque los datos están 
memorizados en la matriz TT$(+,5) 


Puntero al primer B$(x) al que 
deben transferirse los datos 


Principio del bucle de transferencia 
en BS(+) 


Con K 
N=1 


=J-5w(1-1) 
+ 10* (K-1) 


El bucle de desempaquetado 
termina con los índices 
5, 10, 15;.20 


La posición desacostumbrada de 
la lectura se debe a la subrutina 
8000, en la que debe leerse 

el primer registro del grupo 


Sale con | = 5, o sea después 
de haber leído y desempaquetado 
el 4 (último de las respuestas) 


En este punto, AAS contiene 
el registro correspondiente 
al número 5, o sea D$(w) 


Principio bucle extracción 
descripciones (D$()) 


N=1+ 10% (J-1) 


El diagrama de esta rutina 

se ha omitido porque depende 
del tipo de máquina. Sin embargo, 
la lógica es análoga a las 
anteriores y puede verse 

en los listados 


PRESENTACION MASCARA 


Para If= 1 también 


caso, no es 
respuesta, 
sino el tema 


9) 


En el punto de coordenadas 
YS,XC. El diagrama de esta 
subrutina se ha omitido porque 
depende del tipo de máquina 


Principio posicionado 
primeras tres líneas 


Calcula la línea (con paso 2). 
La columna siempre es XC + 16 


Si la descripción (D$(l)) o la 
respuesta (B$(1)) no contienen 
caracteres, el campo 

se salta 


Principio bucle 4 lineas 
siguientes, que sólo 
contienen B$() 
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(*) Memoriza en YR(x) y XR(*) las coordenadas 
de principio de campo. Estos valores se utilizarán 
en la subrutina de introducción 


con los trazos (recuérdese que B$(x) no debe ser pre- 
sentado, porque contiene las respuestas a dar y sólo 
se empleará para la comprobación de su exactitud). 

Durante este bucle también se memorizan en las ma- 
trices YR(*) y XR(x*) las coordenadas de principio de 
los campos de datos. De esta manera se tiene la pre- 
paración automática de los parámetros necesarios 
para la data entry de introducción y la comprobación 
de respuestas. Los valores numéricos utilizados en el 
cálculo de las coordenadas (X,Y) corresponden a la 
estructura de la máscara y no tienen otro significado. 
Por tanto, el usuario puede variarlos para cambiar la 
forma de la presentación. La rutina es muy sencilla, y 
sólo hay que recordar que, en el primer bucle, el cam- 
po B$(1) no representa un dato, sino el valor del campo 
clave, o sea, expresa el tema sobre el cual se plantea- 
rán las preguntas y, por tanto, debe presentarse (a di- 
ferencia de los otros). Además, hay que tener en cuen- 
ta que la presentación de las descripciones (D$(+)) o 
de los trazos para la introducción de las respuestas 
debe estar subordinada a una comprobación: la des- 
cripción y el dato (B$(+)) no deben ser nulos. 
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Qu 


Le 


X tiene el valor fijo XC + 29 


2 


1 


DL 


Aunque esta comprobación hace más largo el tiempo 
de proceso, es necesaria porque no se ha dicho a 
priori que sean necesarias todas las preguntas posi- 
bles, y las no utilizadas no deben generar un campo 
de introducción. 


Introducción de las respuestas. La función de esta 
subrutina es esencialmente la de una data entry modi- 
ficada, porque además de prever las operaciones nor- 
males de datos, también debe incluir su comproba- 
ción (comparación con las respuestas correctas con- 
tenidas en la matriz B$(x)). Esta comprobación debe 
realizarse de dos maneras diferentes en función del 
tipo de pregunta. Cuando algunas sólo prevén una 
respuesta, el control se reduce a un test de igualdad 
entre el contenido del buffer correspondiente y el valor 
introducido por el usuario (en C$). 

Para las otras, la lógica se complica por la presencia 
de varias respuestas, todas válidas. En este caso, el 
programa debe poder comparar la respuesta introdu- 
cida con todas las posibles y discriminar tres situacio- 
nes distintas: 


INTRODUCCION 
RESPUESTAS 
(PRIMERA PARTE) 


El índice | empieza por 2, porque Selecciona la primera pregunta 
el primer valor (B$(1)) es el B$(2) 

tema de las preguntas Obsérvese que no es un bucle 
(o sea la clave seleccionada 


anteriormente) 'O) ) y 


El valor O en una de las 
coordenadas XR(:), YR(-) indica 
que la correspondiente 

y No pregunta no se ha previsto. 
Los valores de las dos matrices 


se han implantado en la 
'0) subrutina 16000 


O—— NA Principio bucle 10 caracteres que constituirán la respuesta | 


Los caracteres leidos 

se acumulan en C$ hasta el 
RETURN. La cadena se 
completa con espacios 


y 


El niño ha introducido la 
(5) palabra AYUDA para obtener 
la respuesta de la máquina 


xy NO Implanta los limites de búsqueda en base a la linea 


Si Si 


“> > > 


NO 


NO y O La respuesta debe Ny NO 
buscarse 
El control sobre las en el grupo 
respuestas para las que empieza 
líneas 1,2 y 8 con 3 
es una sencilla o con 9 
comparación de ny 


igualdad con las 
preguntas. Para 
las otras se 


: Principio bucle 
necesita un bucle 


si Una vez hallado 
hay que comprobar 
que no sea una 
respuesta ya dada 


KK indica el número de 
respuestas correctas 


KE indica el número de 
errores cometidos 
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= la respuesta no existe, o sea se trata de un error 

= la respuesta, aunque está entre las previstas, ya se 
ha dado: se trata de una duplicación y debe des- 
cartarse 

" la respuesta todavía no se ha introducido y está en- 
tre las correctas: es una respuesta correcta, y como 
tal debe memorizarse. 


Observando la máscara vídeo es evidente que las pre- 
guntas con una sola respuesta están en las líneas 1, 2 
y 8, por lo que en el diagrama se ha incluido un control 
sobre el número de línea en curso que determina el 
tipo de lógica a activar (respuesta única o múltiple). 
La subrutina utiliza el índice «|» para identificar la pre- 
gunta en proceso, o sea la que corresponde a la posi- 
ción actual del cursor. 

El índice empieza por el valor 2, porque en la primera 
línea debe haber escrito el valor de la palabra clave 


INTRODUCCION RESPUESTAS O 
(SEGUNDA PARTE) 


O= 


(B$(1)), que representa el tema de las preguntas. In- 
mediatamente después de la implantación del valor 
inicial del índice se inserta un control sobre XR(l). La 
matriz XR(+*) contiene el número de línea sobre la que 
debe escribirse cada respuesta (recuérdese que en la 
presentación de la máscara, en esta zona hay escritos 
trazos en número igual a la longitud máxima de la res- 
puesta a dar, por lo que se tiene una presentación 
análoga a la de la data entry normal). 

Comprobando el valor de cada elemento de la matriz 
puede determinarse si se ha activado la correspon- 
diente pregunta (en la fase de generación) o no. Efecti- 
vamente, si el contenido de XR(1) es cero, la pregunta 
(número «l») no está prevista, y el programa pasa a 
una nueva línea después de haber comprobado que 
el valor del índice | no supere el máximo previsto (pri- 
mera parte del diagrama de la página anterior). 

En cambio, si el contenido es distinto de cero, se entra 


La matriz NE(20) contiene los 

punteros de las respuestas correctas 

ya dadas. El control de duplicación 

se obtiene comprobando que la respuesta 
"L” no esté ya presente 


Memoriza el 
puntero en la 
primera posición 
vacía 


Fin de las 
preguntas 


Nueva pregunta 


Esta situación nunca puede producirse 
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Presenta la pantalla con 

Número de respuestas correctas (KK) 
Número de respuestas erróneas (KE) 
Número de veces que se 

ha pedido ayuda (KA) 


INTRODUCCION RESPUESTAS (TERCERA PARTE) 


Para las preguntas 
que contienen una 
sola respuesta no 
es necesario bucle 
de selección 


0 
Ye 


Con el mismo 
método empleado 
anteriormente 


A 11 


Indica una respuesta aún no dada 


Lt 


E 


2 


v 


dis 
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en la fase del proceso. El cursor se posiciona en el 
punto de coordenadas XR(l), YR(I), y el programa se 
pone en espera de la respuesta. 

En cualquier momento es posible introducir la palabra 
AYUDA en lugar de la respuesta. En este caso, el pro- 
grama debe presentar la primera respuesta todavía no 
dada. Para realizar esta función debe comprobarse si 
la introducción efectuada (en C$) contiene la palabra 
«AYUDA». En caso afirmativo se activa la parte del 
programa que presenta la respuesta (gráfico de la iz- 
quierda). 

También en este caso debe distinguirse entre las pre- 
guntas que prevén una sola respuesta y las que les 
corresponden varias. 

El primer tipo se identifica con los valores 1, 2 y 8, por 
lo que basta un test sobre el índice «l» para seleccio- 
nar uno u otro caso. 

Si la respuesta es única sólo hay que posicionar el cur- 
sor y escribir el contenido de B$(l). Si no es así, es 
necesario un bucle para determinar, entre las respues- 
tas posibles, cuáles se han dado, seleccionando y 
presentando la primera aún no introducida. 

En ambos casos, después de la presentación, el pro- 
grama vuelve al principio de la subrutina para el análi- 
sis de un nuevo campo (después de la petición de 
ayuda y la consiguiente presentación de la respuesta, 
el índice «|» se incrementa en 1, por lo que apunta a la 
siguiente pregunta). 

En el caso de que no se haya pedido ayuda, sino que 
se haya introducido una respuesta, la subrutina entra 
en la fase de análisis para determinar si la respuesta 
es correcta o no. Como se ha indicado anteriormente, 
antes de realizar el análisis es necesario determinar si 
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la pregunta prevé una sola respuesta o varias realizan- 
do un test sobre el valor de «l». Si el índice tiene un 
valor 1, 2 u 8 (recuérdese que el valor 1 no correspon- 
de a una pregunta) sólo hay que comparar C$, que 
contiene la respuesta. 

En caso de error se borra la introducción, se incremen- 
ta el contador de error (KE) y el programa se pone en 
espera de una nueva introducción en el mismo cam- 
po. En cambio, si las dos cadenas coinciden, se incre- 
mentan tanto el índice | para pasar a una nueva pre- 
gunta como el contador (KK) de respuestas correctas. 
Obsérvese que el incremento del índice | en este pun- 
to del programa no debe ir seguido de ningún control, 
porque el valor no puede ser superior a 9. De hecho, el 
desarrollo de esta derivación del programa está subor- 
dinado a un valor de | que como máximo puede ser 8. 
La otra rama del programa, con índice | diferente de 
los valores anteriores, tiene un desarrollo más com- 
plejo porque debe comprobar la respuesta dada, te- 
niendo en cuenta las posibles duplicaciones. 

La lógica es la siguiente: en primer lugar se comprue- 
ba la existencia de la respuesta dada entre las correc- 
tas, sin tener en cuenta eventuales duplicaciones. De 
este modo, si la respuesta es errónea, no se activa la 
parte que sigue. 

Si esta comprobación se supera (respuesta correcta), 
el programa pasa al control de eventuales repeticio- 
nes. Esta función se realiza memorizando los punteros 
de las respuestas correctas en la matriz NE(«), por lo 
que basta con comprobar que el número correspon- 
diente a la respuesta introducida no esté ya contenido 
en NE(+*) para asegurarse de que no se trata de una 
duplicación. 


Generación. La foto muestra la fase inicial de las 
preguntas en la versión Apple. Se definen el título 
(España), que se empleará sólo como comprobación 
en la elección del soporte, y el campo clave (Islas) que 
define el tema de las preguntas. 


La siguiente fase de generación prevé la introducción 
de los datos. La pantalla contiene, como recordatorio, 
la clave. En la parte inferior se encuentra la máscara 
de introducción de preguntas y respuestas 


Al final de la primera introducción, el sistema pregunta 
si se desea continuar con otra lección. 


Respondiendo «S» a la pregunta anterior, es necesario 
volver a cargar una parte del programa que se había 
borrado. El sistema pide el disco programas y espera el 
acuerdo para proseguir. Esta solución, farragosa desde 
el punto de vista operativo, se ha adoptado en previsión 
del uso de sistemas con una sola unidad de disco. 

En el caso de que las unidades fuesen dos, basta con 
direccionar por separado los programas de los datos 
y eliminar esta máscara vídeo. 


SUPERFICIE 
MARES 


HABITANT 


PALMA _ DE M 
MANACOR 


NCA 
ALCUDIA 


MALLORCA 
36009 Km2 
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Después de la fase anterior, el sistema se pone en 
introducción del dibujo. En esta versión, como falta la 
gestión de sprites, la figura se forma en alta resolución 
con un programa que simula los sprites asociando un 
símbolo gráfico a cada tecla. 


Desarrollo. Terminada la fase de generación, puede 
pasarse al uso de los datos, o sea al desarrollo de las 
«lecciones». El programa informa al usuario que el título 
es España y espera la selección del tema. El usuario 
elige uno de los temas presentes (en la foto se ha 
elegido el río Ebro) y entra en la fase de desarrollo 


Empleando los datos introducidos en la fase de 
Generación, el programa extrae la máscara vídeo 
correspondientes al río Ebro y espera la introducción 
de las respuestas 


Al final de la introducción se presenta la máscara de 
los resultados, que contiene el número de respuestas 
correctas, de las erróneas y de las veces que se ha 
pedido ayuda 
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Generación. También para la versión MSX, que adopta 
como soporte magnético la cinta, en el procedimiento 
Geografía se han previsto dos programas. El primero, al 
que se refiere la foto, se dedica a la creación del archivo 
de los datos que constituirán las lecciones. Apenas 
activado este programa, el usuario debe introducir el 
título y la clave de identificación del grupo de lecciones 
que entrará, hasta un máximo de trece. 


Introducción lecciones. El primer paso de la 
generación de una lección es la construcción de la 
figura ilustrativa. Los comandos de que se dispone en 


esta fase son: 
Libe> = mueven el cursor en las 4 direcciones 


A = enciende el punto en que está el cursor 
S = apaga el punto en que está el cursor 
ES = convalida la figura 

Cada lección de geografía se ilustra con una figura 
formada así. 


Una vez definida la forma de la figura puede pasarse a 
la elección del color. Siempre mediante la tecla F5, se 
introduce la elección: el color quedará así memorizado 
junto con los datos correspondientes a la lección. 


La segunda fase de la introducción de lecciones prevé 
la inserción de las cinco preguntas previstas. La 
primera será escrita por el programa y no podrá 
modificarse, porque corresponde a la clave de 
interpretación del grupo, común a todas las lecciones 
introducidas. 


¿e 
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RELACION DE VARIABLES - COMMODORE 64 


Generación 


BS(x) = matriz de los buffers (1 por campo 
de introducción) 

= longitud del campo de introduc- 
ción 

= número de decimales en el campo 
de introducción 


LC(«) 


ND(+) 


= coordenadas en el vídeo del cam- 


CX(+) 
po de introducción 


CY («) 


ao | =coordenadas en el vídeo de la 
descripción 

TF(«) = matriz numérica con los códigos 
ASCII de las teclas de comando 

DS(+) = descripciones en la máscara ví- 
deo 

VOS$(+) =voces del menú principal 

BL$ = blank 

PD$ = punto decimal 

AS$ = Carácter “—”; identifica los campos 
de introducción alfanuméricos 

NS$ =carácter “+”; identifica los cam- 
pos de introducción numéricos 


HOS$ = borrado de pantalla 

NUC =número de campos de introduc- 
ción en la máscara vídeo activada 

DS =número de descripciones en la 
máscara vídeo 

AAS$ = cadena de l/O con el disco 

NFS = nombre fichero datos 


A,B$5,C,D =variables para lectura del estado 
del disco 
HS(«) = cadenas de la ayuda 
SPS$(+) =Cadenas con los datos sprite en 
forma alfanumérica 
UG = última lección introducida 
LZ = bloque de datos para el sprite 
P1 =posición de partida para datos 
sprite 
= matriz de las teclas reconocidas 
en la generación sprite 
FA = índice de la tecla pulsada en la 
creación sprite 
cc = color carácter en la retícula sprite 
sP = primera dirección de control VIC-!! 


TA(x) 


Uso 


BS(+) 
LC(») 
ND(x) 
exo) 


DX(+) ) 
DY (+) 


TF(«) 
DS(+) 


VOS(+) 
BLS 
PDS 
ASS 


= matriz de los buffers (1 por campo 
de introducción) 

=longitud del campo de introduc- 
ción 

= número de decimales en el campo 
de introducción 


= coordenadas en el vídeo del cam- 
po de introducción 


=coordenadas en el vídeo de la 
descripción 

= matriz numérica con los códigos 
ASCII de las teclas de comando 

=descripciones en la máscara ví- 
deo 

=voces del menú principal 

= blank 

= punto decimal 

=carácter “—; identifica los cam- 
poss de introducción alfanuméri- 
cos 

=cCarácter “+”; identifica los cam- 
pos de introducción numéricos 

= borrado de pantalla 

=número de campos de introduc- 
ción en la máscara vídeo activada 

=número de descripciones en la 
máscara vídeo 

= nombre fichero datos 

= Cadena de l/O con el disco 

= última lección introducida 

= campo clave perdido 

=campo clave leído del disco 

= Código de error 


= coordenadas máscara vídeo 


= respuestas correctas 

=errores 

= ayudas 

= Cadena para comparación en pe- 
tición de ayuda 
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La versión MSX está orientada al empleo con la unidad 
de cinta. La foto, como las siguientes, si bien 
corresponde a este sistema, también puede utilizarse 
como guía para las versiones en disco de las otras 
máquinas. 

Además, muchas funciones son idénticas, desde el 
punto de vista del usuario, a las de la correspondiente 
versión en disco: por ejemplo, la introducción de los 
datos en la fase de generación es completamente 
análoga a la de las versiones en disco. 


Terminada la introducción, sigue la misma pregunta de 
la versión en disco. 


La foto muestra una de las principales diferencias con 
la versión en disco. Efectivamente, en este caso es 
necesario volver a posicionar la cinta al principio y 
preparar el grabador. En cambio, para las versiones 
en disco, los datos son transferidos sin ninguna 
intervención del usuario. 


También en la fase de utilización, la versión en cinta es 
análoga, para el usuario, a la de disco, pero como 
desarrollo del programa es completamente diferente. 
La foto muestra la fase inicial del desarrollo del test 
preparado como se ha indicado en las fotos anteriores. 


.6.S. Ediciones Forum, 


Rebobina la cinta datos 
uv aprieta PLAY 


S.A 


2273 


La foto muestra la fase de selección del tema. En este 
caso, el título es AMERICA y se pide la pregunta sobre 
PERU en el ámbito de las naciones. 


La presentación y el desarrollo del test son idénticos a 
los de las otras versiones. La pregunta está completada 
con un dibujo, obtenido con los sprites. 


La foto muestra el efecto de la petición de ayuda 
(activada tecleando la palabra AYUDA) en el campo 
SUPERFICIE. El sistema intercepta el comando, sale de 
la lógica de introducción de respuestas, y presenta el 
contenido del buffer correspondiente a la posición 
actual del cursor, o sea la respuesta correcta. 


Al final del desarrollo se presenta la única tabla de 
resumen que muestra los resultados obtenidos. En esta 
versión, la tabla aparece en la misma máscara de 
desarrollo, en el lugar del gráfico. 
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Edioiones Forum, S.A 
El tema de las lecciones es: 
AMERICA 


Las preguntas versaran sobre: 
NACION 


CUAL ? PERU 
exoríibe FIN Para £alír 


Edioiones Forum, 


Ediciones Forum, 
RESPUEST. 
CORREC 10 
ERRON. 3 


AYUDAS 3 


PULSA UNA TECLA PARA CONTINUAR 


Extensiones y modificaciones 


Este procedimiento, basado esencialmente en un diá- 
logo, puede resultar demasiado «estático» para las 
personas jóvenes. 

La presencia de un dibujo en la misma pantalla vídeo 
en la que aparecen las preguntas puede constituir un 
motivo de interés a inducir al niño a que utilice el pro- 
grama, aunque aún sería más estimulante la presencia 
de figuras en movimiento. 

La implantación que se propone permite generar un 
programa que simula un «viaje» a través de una zona 
geográfica y plantea preguntas de vez en cuando. 
Para finalizar la ilustración con un caso concreto, su- 
pondremos que se desean comprobar los conoci- 
mientos sobre las capitales europeas. 

Con el programa anterior puede construirse un dibujo 
que muestre el «esquema» de Europa y asociarlo a 
una serie de preguntas, como por ejemplo los habitan- 
tes, los recursos y las capitales de cada estado. 

Las preguntas y las respuestas se gestionan con una 
data entry, por lo que el niño se encuentra dialogando 
a través de un coloquio poco atractivo. 

Las mismas preguntas pueden plantearse de una ma- 
nera más dinámica construyendo un pequeño mapa 
geográfico de mayores dimensiones y planteando las 
preguntas mediante un símbolo que se desplace por 
el mapa y se detenga en la posición correspondiente a 
cada capital, invitando así a introducir el nombre. 
Utilizando esta nueva estructura, la pantalla vídeo ya 
no está ocupada por las leyendas de la data entry, por 
lo que puede construirse un dibujo mucho mayor que 
permita identificar claramente la posición del símbolo 
que se desplaza. 

En la página 2276 se ha representado el diagrama de 
principio. Por motivos de sencillez, el programa no es 
parametrizado, por lo que todos los valores (coordena- 
das del mapa, respuestas, etc.) deben asignarse, por 
ejemplo, con una serie de DATA. 

Las magnitudes necesarias son: 


m Coordenadas de los puntos del mapa 

m Coordenadas de los puntos correspondientes a las 
preguntas (en el ejemplo de las capitales, están en 
el mapa) 

m Matriz de respuestas (nombre de las capitales) 


El mapa puede generarse utilizando una de las subru- 
tinas gráficas ya presentadas, por lo que las funciones 
a realizar se reducirán a unir la serie de puntos que 
esquematizan el contorno, o a la utilización de un cier- 
to número de sprites unidos entre sí (subdividiendo el 
mapa en rectángulos, cada uno correspondiente a un 
sprite). 

Por tanto, en las DATA deberán escribirse las coorde- 
nadas de los puntos o los valores de los sprites. En el 


primer caso, la presentación del mapa consiste en unir 
los distintos puntos con segmentos y, en el segundo, 
sólo es necesario el posicionado de los sprites. Des- 
pués hay que definir las posiciones de los puntos (ca- 
pitales) objeto de las preguntas. En el caso de gráficos 
de alta resolución, basta con presentar estos puntos 
con un símbolo diferente, mientras que para los spri- 
tes, el punto debe incluirse en la definición y, por tanto, 
determinarse a priori. 

La primera solución es más difícil desde el punto de 
vista de la programación, pero permite volver a utilizar 
el dibujo de base, puesto que para modificar las pre- 
guntas sólo hay que variar las coordenadas. La segun- 
da, que no emplea alta resolución, es más sencilla, 
pero en caso de modificación de las preguntas requie- 
re la redefinición de los sprites. 

Finalmente, obsérvese que la elección entre una y otra 
solución depende del tipo de máquina empleado. 
Una vez presentado el mapa completado con los sím- 
bolos de identificación de las preguntas, debe activar- 
se el mecanismo de movimiento. Esta parte del pro- 
grama se reduce a un bucle que posiciona el símbolo 
y espera la respuesta. La comprobación de su exacti- 
tud es inmediata por comparación del elemento «|» de 
la matriz B$(N), que contiene las respuestas. 

En caso de error se tiene la indicación (por ejemplo 
utilizando el módulo musical) y, si no, se tiene otro po- 
sicionado para una nueva pregunta. 

La implantación ilustrada implica importantes modifi- 
caciones en todos los programas del procedimiento, 
hasta el punto de que es conveniente volverlos a escri- 
bir. Por tanto, debe entenderse como una propuesta 
para la preparación de nuevos programas. Los pre- 
sentados pueden utilizarse como guía y para sacar de 
ellos algunas subrutinas que, con las adecuadas mo- 
dificaciones, se adapten a la nueva estructura. 

Una segunda implantación, menos sustancial, puede 
consistir en la creación de un directorio para la memo- 
rización de las lecciones superadas. 

El procedimiento, en su versión actual, no conserva 
memoria de qué lecciones ha superado cada usuario 
y con qué resultados. Esta función es necesaria si se 
desea utilizar los programas con fines didácticos. 
Las modificaciones a realizar consisten en la creación 
de un fichero para cada usuario previsto, con un nú- 
mero de registros igual a las lecciones que constituyen 
el curso. Al final de cada lección, la máscara vídeo 
que resume el resultado deberá memorizarse en el re- 
gistro correspondiente, obteniendo así un archivo his- 
tórico del desarrollo del curso. Esta estructura requiere 
además la numeración progresiva de las lecciones, lo 
cual puede obtenerse fácilmente insertando el número 
progresivo de lección en el mismo campo de la pala- 
bra clave. 
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DIAGRAMA DE PRINCIPIO DE LA IMPLANTACION 
AL PROCEDIMIENTO 


En el programa deben asignarse 

los valores: 

N = Número de las preguntas 

B$(N) = Matriz que contiene las Con DATA se leen los 
respuestas valores de: 

X(N) 


Y(N) =Coordenadas de los 
puntos correspondientes N, BS(N), X(N), Y(N) y las 
a cada pregunta coordenadas del mapa o de 
los sprites 


El mapa se presenta en 
pantalla poniendo de 
manifiesto los puntos X(N) e 
Y(N) 


Principio del bucle para el uso 
del programa 


En el punto de coordenadas 
X(N), Y(1) (el símbolo se 
emplea para la versión Apple) 


La respuesta se introduce 
en R$ 


Comprueba la respuesta 
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Tests ógicay ley asociativas 


Los tests se utilizan mucho para evaluar algunas ca- 
racterísticas nuestras. Existen varios tipos, cada uno 
orientado a un objetivo particular, aunque pueden re- 
ducirse a pocas lógicas fundamentales, fácilmente re- 
producibles con el ordenador. 

Los programas que se ilustran en esta parte permiten 
gestionar tres tipos distintos de tests, incluso con el 
uso de gráficos, y pueden emplearse bien como pasa- 
tiempo, bien para evaluar el aumento de la inteligencia 
de los niños. 

Como de costumbre, la estructura de los programas 
es completamente abierta, por lo que pueden aceptar 
eventuales modificaciones y, principalmente, una gran 
variedad de datos. Esto permite implantar muchos 
tests, cada uno con eventuales variantes, obteniendo 
así una gran «biblioteca» siempre disponible, gestio- 
nada por un «control» imparcial y rápido de las res- 
puestas. 

El uso de estos programas puede desarrollarse según 


Uso del programa 


Esta aplicación tiene una doble vertiente: el empleo 
requerido para la preparación de los tests, puesto que 
es el usuario el que debe idear y construir los tests, y la 
fase de solución, orientada a quien responde. 
Debido a esta doble funcionalidad, la aplicación está, 
como de costumbre, dividida en dos programas. El 
primero para la generación de los tests, y el segundo 
para la comprobación de las soluciones. 

Ambos pueden trabajar con 3 tipos de tests diferentes: 


am Tests con símbolos gráficos (sprites) 
m Preguntas y respuestas con puntuación 
m Tests con atributos 


Tests con símbolos gráficos 


Uno de los tests propuestos con más frecuencia con- 
siste en presentar una serie de símbolos y pedir al 
usuario que la complete introduciendo el que falta. Es- 
tos programas, habitualmente uno de generación y 
otro de uso, permiten definir una serie de 5 figuras a 
presentar como preguntas y comprobar la respuesta 
comparándola con el elemento dado como solución. 
Naturalmente, no es necesario que la serie presentada 
contenga todos los 5 elementos posibles. 

Este procedimiento, desde el punto de vista de la pro- 
gramación, no tiene ninguna dificultad. Conviene utili- 
zar un fichero único que contenga una serie de pre- 
guntas: en los listados hay previstas 50, valor que no 


dos modalidades: introduciendo tests ya preparados o 
bien creándolos según las necesidades específicas. 
En particular, este segundo modo permite gestionar 
tests de carácter educativo: efectivamente, utilizando 
la versión «por atributos» (una de las tres previstas), el 
programa puede aplicarse a una disciplina cualquiera, 
comprendidas las materias didácticas. 

El procedimiento contiene tres programas, cada uno 
dedicado a un tipo de test particular. 

El primero presenta un cierto número de símbolos grá- 
ficos que, en su conjunto, constituyen una serie lógica. 
El desarrollo del test consiste en identificar entre varias 
figuras la que falta para completar la serie. 

El segundo está constituido por algunas preguntas 
con una puntuación asociada que depende de la res- 
puesta; durante su desarrollo, la máquina tiene en 
cuenta los puntos totalizados y emite un juicio. 

El tercero, más complejo, es del tipo «por atributos», y 
permite analizar la capacidad asociativa del usuario. 


constituye un límite porque pueden utilizarse más dis- 
kettes de datos, cada uno con un máximo de 50 tests. 
En el gráfico de abajo de la página 2286 se ha repre- 
sentado la estructura del fichero. Para identificar cada 
elemento de la serie de 5 (a completar) se ha utilizado 
el término «símbolo», pero en realidad también podría 
ser una palabra, una frase o un nombre. 

En la versión presentada, cada símbolo es un sprite y, 
por tanto, en el caso de letras o de números deben 
definirse de manera esquemática, o bien modificar el 
listado previendo más sprites para el mismo símbolo: 
de esta manera se dispone de espacio. 

Por ejemplo, cabe formar series con nombres de per- 
sonajes famosos, dejando el último como respuesta. 
La dificultad de este programa es la estructuración del 
test de manera correcta. Al formar la serie, el elemento 
que falta, o mejor dicho, que no se muestra, que cons- 
tituye la respuesta, debe ser único. Por tanto, la serie 
debe ser suficiente por sí misma, sin otras explicacio- 
nes, para ilustrar el tema de la pregunta. 

Este resultado es relativamente sencillo si se utilizan 
los símbolos sintéticos como números o dibujos, mien- 
tras que puede presentar dificultades o ambigúeda- 
des en los otros casos. 

Por ejemplo, presentando las series 8 10 y 14 16 18, es 
unívoca la elección del elemento que representa el va- 
lor 12, mientras que utilizando el programa en forma 
más general, por ejemplo con palabras como elemen- 
tos de la serie, la solución podría no ser unívoca. 
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Por tanto, en la construcción del test, en particular en 
su forma más generalizada, debe prestarse mucha 
atención a que la serie presentada no tenga más de 
un elemento común, porque en caso contrario, puede 
incurrirse en respuestas correctas incluso en el caso 
de que no estén previstas. 


Preguntas y respuestas con puntuación 


La estructura del test es la siguiente: la máquina pre- 
senta una pregunta y una serie de posibles respuestas 
(hasta 10): el usuario debe indicar su elección, en ba- 
se a la cual el sistema indicará una puntuación. Al final 
del test, la puntuación total obtenida (suma de las co- 
rrespondientes a cada pregunta) se compara con los 
valores obtenidos en una tabla de «diagnósticos» y se 
emite un juicio. Por tanto, en sustancia, se trata de ges- 
tionar los siguientes ficheros: 

m FP: fichero preguntas, que contiene el texto de las 
preguntas o, más en general, la ilustración del 
test. Cada pregunta está formada por un má- 
ximo de 20 líneas (registros) de 35 caracteres 
fichero de las respuestas, que debe tener tan- 
tos registros lógicos como los de FP. Cada re- 
gistro lógico contiene un máximo de 10 res- 
puestas, cada una con su propia puntuación, 
por lo que un registro físico está constituido 
por 10 registros físicos 

tabla de los totales, que contiene el «diagnós- 
tico» para un máximo de 10 gamas de pun- 
tuación total. 


a Fr: 


En la página 2290 se muestran la estructura de los fi- 
cheros y la lógica del programa. En el gráfico de la 
página 2291 se ha representado el diagrama, a nivel 
funcional, del programa de generación, y en el de la 
página 2292, el del programa de desarrollo. 

Este tipo de test difícilmente puede ser ideado por 
quien utiliza el programa, que en general está destina- 
do a identificar determinados aspectos del carácter, y 
las preguntas deben ser formuladas por especialistas 
del sector, así como las gamas de puntuación y los 
diagnósticos, que se obtienen de complejos procesos 
estadísticos. Por tanto, el uso más normal es como ar- 
chivo en el que se memorizan los tests extraídos de 
publicaciones especializadas. La utilidad del ordena- 
dor está principalmente en la facilidad de formar un 
archivo y en la imparcialidad de las respuestas. Mu- 
chas veces, el que realiza un test cae en la tentación 
de «echar una ojeada» a la solución y, por tanto, a 
quedar influido. Esta posibilidad es imposible en el or- 
denador. 


Tests con atributos 


Los programas anteriores están estructurados en fun- 
ción del tipo de test a presentar, no son generalizables 
y no permiten una gestión aleatoria de las preguntas. 
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Esto significa que, para un determinado test, las pre- 
guntas siempre serán las mismas y, así, las respues- 
tas siempre deberán corresponder a las respuestas 
predefinidas en la fase de generación. Esta estructura 
determina una rápida obsolescencia del test; después 
de haberlo utilizado algunas veces, el usuario conoce 
las soluciones o las puntuaciones, por lo que cesa to- 
do interés. En consecuencia, es necesario crear cons- 
tantemente tests nuevos. 

Este último tipo, por atributos, tiene en cambio una es- 
tructura «dinámica», en el sentido de que puede pre- 
sentar un elevado número de preguntas diferentes, no 
predefinidas. Por tanto, constituye un medio generali- 
zado, Útil tanto como distracción como para la ense- 
ñanza o la comprobación de la preparación en distin- 
tas disciplinas. 

La estructura de base del programa es una matriz divi- 
dida en líneas y columnas. 

En la tabla que sigue se ha representado un ejemplo 
en el que se examinan algunos animales a la luz de 3 
atributos: ser mamífero, carnívoro y salvaje. La estruc- 
tura de datos es la siguiente: 


Atributos 


a os po. 
1 


Elemento 


1 
Perro 1 
Canguro 0 
1 


Delfín 


1 


La pertenencia de un elemento a una clase que tiene 
un atributo se ha representado con el símbolo 1 en la 
casilla correspondiente. 

De esta manera puede utilizarse el test con entrada 
por línea, extrayendo uno o más elementos y pregun- 
tando cuáles son los elementos que poseen el atributo 
presentado. 

Con la tabla anterior, el primer modo consiste en ex- 
traer un nombre, por ejemplo Canguro, y preguntar 
cuáles de las aserciones, mamífero, carnívoro, salvaje, 
son ciertas. Para comprobar la exactitud de las res- 
puestas, éstas se comparan con las que hay conteni- 
das en la tabla. 

El otro modo consiste en presentar un cierto número 
de los elementos presentes, como por ejemplo Vaca, 
Canguro, Delfín, pidiendo cuáles satisfacen uno de los 
atributos, por ejemplo la columna c (salvaje). 

La extracción de los elementos puede ser aleatoria, 
así como la columna del atributo, por lo que, en este 
caso, se tendrá una pregunta diferente cada vez que 
se utiliza el test. 

Naturalmente, la complejidad y la variedad de los 
cuestionarios dependen de la magnitud de la tabla de 
referencia: cuanto mayor sea el número de elementos 
y de atributos, tanto más complejo será el test. 

La estructura presentada acepta hasta 10 atributos di- 
ferentes, mientras que no hay límite en los elementos 


que pueden añadirse, incluso en tiempos sucesivos, al 
primer planteo del test. 

En la página 2294 se ha representado el diagrama 
que muestra la estructura de files utilizada. 

Sólo son necesarios dos ficheros: el primero contiene 
las explicaciones de los 10 atributos, por lo que sólo es 
una parte descriptiva utilizada para proporcionar las 
indicaciones necesarias para el desarrollo del test, 
"mientras que el segundo tiene tantos registros como 
elementos considerados, cada uno con el nombre del 
elemento y 10 bytes que pueden asumir el valor O o 1 
según esté o no presente el atributo. La tabla anterior 


Menú principal. En el C-64, el procedimiento Test 
utiliza seis programas diferentes para los tres tipos de 
tests previstos. Para comodidad del usuario se ha 
incluido un módulo de carga que permite seleccionar, 
cargar y enviar a ejecución el programa elegido. La 
selección se realiza introduciendo en la máscara 
presentada el número correspondiente a la función 
elegida. 


Test con puntuación: Generación. El usuario ha 
seleccionado la voz 1 del menú principal, la cual activa 
el programa para la generación del test con puntuación. 
En esta fase hay que proporcionar la sigla del test, 
constituida por dos caracteres (el usuario ha elegido el 
valor a1), y el número de preguntas previstas en el test 
(en este caso 2). 


Una vez completada la máscara anterior con los valores 
pedidos, el sistema pasa a la fase de introducción de 
datos. La primera parte prevé una máscara vídeo 
entera disponible para la pregunta. El espacio se ha 
dejado amplio para que pueda contener, además de la 
pregunta propiamente dicha, una breve presentación 
del test. 


daría lugar a un fichero con los siguientes 4 registros: 


Vaca 100: Registro 1 
Perro 110: Registro 2 
Canguro 00 1: Registro 3 
Delfín 1 1 1: Registro 4 


En las páginas 2295 y siguientes se han representado 
los diagramas de principio para la introducción de los 
datos y el uso del test. Estos diagramas son voluntaria- 
mente muy generales porque no difieren de los utiliza- 
dos en otras aplicaciones, excepto en la lógica utili- 
zada para la presentación de las preguntas. 


A = " 

INTRODUCIR El MUMERO CORRESPONDIENTE 
PROGRAMA DESEADO 
ERACION TEST-PUMTOS 

TEST-PUMTOS 
E TEST-ATRIBUTOS 
ESARROLLO TEST-ATRIBUTOS 
ENMERACION TEST-SIMBO S 
ESARROLLO TEST-SIMBO 
1 DE TAREA 


15 
c2 
c3> 
A 
S 
6 
8> 


D 
6 
> D 
F 
» 


5 
El 


Generacion TEST-puntuaciones 
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La siguiente fase consiste en la introducción de las 
respuestas asociadas a la pregunta, cada una con su 


propia puntuación. Durante el uso del programa, el UU 2.2. E: PRA 5 Forum A 
sistema suma los puntos obtenidos con las distintas Mc eneracion TES puntuaciones 


respuestas y, en base al resultado, emite un juicio. 


tespuesta 


a 
o 


y 


] 


a 


TT TT TOBA 


La foto muestra la fase de introducción de las gamas de 
puntuación y de los juicios asociados. En este caso, el 
programa está a la espera del juicio a emitir para 
puntuaciones comprendidas entre 20 y 30. Es decir, la 
introducción del juicio escrito con esta máscara se 
realiza si la suma de los puntos obtenidos con las CAN 
respuestas al test “a1” está comprendida entre los 
valores indicados. 


Tests con atributos: Introducción. También este 
segundo tipo de tests requiere dos fases de 
introducción en la generación. En la primera, 
presentada en la foto, se definen los atributos utilizados 
en el test, y la segunda se dedica a la especificación de 
los atributos asociados a cada elemento. 


La foto muestra la máscara vídeo para la definición de 
los atributos inherentes al elemento “iceberg”. Los 
atributos presentados (animal, desgajado, etc.) se han 
introducido en la fase anterior. Ahora, el usuario debe 
indicar cuáles pertenecen al elemento en la fase de 
definición. 
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Al final de las dos máscaras anteriores, el programa 
pregunta si se desea una nueva introducción; en caso 
de respuesta afirmativa, pasa a otro elemento y, de otro 
modo, termina. 


Tests con símbolos. Este tercer tipo de tests requiere 
la construcción de una serie de dibujos. La foto muestra 
la generación del símbolo n.* 6. La función se obtiene 
con la subrutina de generación de sprites que permite 
construir un dibujo a través de funciones de edición por 
teclado. Simultáneamente con la construcción del 
dibujo en una zona ampliada, el sprite se presenta 
arriba a la derecha y en sus dimensiones reales. 


Test por atributos: Desarrollo. La parte inicial de este 
test se dedica a la presentación de los atributos 
presentes (introducidos en la fase de generación). 


Selección del tipo de lógica. El test por atributos 
puede desarrollarse de dos maneras. En la primera se 
presenta un elemento (por ejemplo “iceberg”) y el 
usuario debe indicar qué atributos, entre los 
presentados, pertenecen al elemento. En la segunda 
manera, la lógica es opuesta, o sea hay que indicar qué 
elementos tienen un determinado atributo. La selección 
de una u otra forma de funcionamiento se realiza 
respondiendo “L” o “C” a la pregunta mostrada en la 
foto. 


Otra 


introduccion (si/no)> 7 M 


al 


enciende 
¿apaga 
introduce 


EJG.S. Ediciones Forum, S.A. 
st 
J Desarrollo - atributos 


puisar una tecla al terminar 1a lectura 


LS Ediciones Forum, S.A, 


¡Desarrollo - atributos 


Desarrollo por linea 
o por columna (L/C) 72M 
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Se ha seleccionado la primera forma de lógica y, por 
tanto, el programa presenta un elemento (“iceberg”) y la 
lista de los atributos presentes. El usuario debe indicar, 
con las letras S(sí) y N (no) cuáles pertenecen al 
elemento. 


1) 


Test por símbolos: Desarrollo. El programa presenta 
los símbolos, definidos en la fase de creación, en dos Desarrollo test con simbolos n. 2 
líneas. En la primera se presentan los dos que 
constituyen la pregunta y, en la segunda, los tres entre 
los que debe realizarse la elección. 


du "eSpue: 


jeguro (s/n) 


El símbolo elegido por el usuario es el 6. El sistema lo 
posiciona como complemento de la primera línea y Desarrollo test 
emite el diagnóstico: en este caso, la solución es la 
correcta (los dos primeros símbolos representan 
triángulos, por lo que para completar la serie es 
necesario otro triángulo). 


Pulsar una 


Test con puntuación: Desarrollo. La primera fase, al 
igual que en el test anterior, se dedica a las necesarias Pregunta 
explicaciones. 


ra 105 estudian: 


facilidad 
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La foto muestra la máscara de introducción de las 
respuestas. En este caso, las previstas son tres, cada 
una con una puntuación propia. El usuario debe 
introducir la respuesta elegida indicando el número 
correspondiente. 


Las siguientes preguntas están estructuradas de la 
misma manera. Para cada una se presenta un esquema 
con las explicaciones. La foto muestra la inherente a la 
pregunta n.* 4. 


Al final de la lectura del texto, que indica el usuario 
pulsando una letra cualquiera del teclado, se presentan 
las respuestas previstas (introducidas en la fase de 
generación). El usuario realiza su propia elección y el 
sistema suma los puntos correspondientes. 


El total de los puntos realizados durante el desarrollo 
del test se utiliza para emitir el juicio. 


Posibles respuestas . 


Respuesta (0-9) 


Pregunta 


Ñ 
+ 


ya pregunta 1: 


Primera pregunta para los proteso- 
res 


d CONEA 4 un prof: 


¡Bud Ballenss 


: noi3de 


cuna 1eC: 


Respues: 


con; 


Posible: POspuest 


jitimar la lectura 


la pregunta +4 


Mm DS di 
ent 
$ PEOLUTO 


acuerda 


Jo 
' acuerdo 
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Ejemplo de test por símbolos. La dificultad del test 
puede llegar a ser importante, ideando símbolos 
complicados y con elementos comunes 
«enmascarados». 


La solución elegida es la correcta: efectivamente, se 
trata de completar una serie en la que el elemento, en 
forma de «T», se desplaza por el interior de una figura 
compuesta por otros dos elementos. Es decir, el 
símbolo n.* 5 es el único que contiene los mismos 
elementos que los números 1 y 2, por lo que constituye 
el complemento de la serie. 


Ejemplo de desarrollo del test por atributos. La foto 
muestra la máscara de presentación de los atributos 
previstos en el test y que deben utilizarse para la 
solución. 


La foto muestra las respuestas (S/N) correspondientes 
al tema «perro». Los atributos sobre los cuales se 
articula el test son los presentados en la máscara 
anterior. Como puede verse, éste también puede 
asumir un notable grado de dificultad, para lo 

cual basta con seleccionar adecuadamente los 
atributos. Por ejemplo, en este caso, al elemento 
«perro» le corresponden algunos elementos inusuales y 
de difícil identificación, como «urbano», o que pueden 
obtenerse a través de asociaciones de ideas como 
«caliente» (que se refiere al bocadillo) o «marino» 
(aludiendo a la foca). 
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Desarrollo test 


Desarrollo * 


ADO 


Edic: 


¡ones FO 


La lógica del programa 
Tests con símbolos gráficos 


Generación. El diagrama de la página 2286 muestra el 
flujo de principio del programa de generación de tests 
con símbolos. En este programa, para proponer el test 
se utilizan gráficos, por lo que debe incluirse en una 
subrutina de generación de los dibujos, la cual es la 
primera función activada por el programa. En el dia- 
grama, la generación de los sprites se ha resumido en 
un solo bloque funcional porque no puede generalizar- 
se, puesto que está estrechamente ligada al tipo de 
máquina utilizada. 

En esta versión no se han previsto funciones de edi- 
ción, por lo que al final de la generación del sprite se 
pide confirmación antes de pasar a su memorización. 
Terminada la construcción de la figura (5 en total, las 2 
primeras como preguntas y las otras 3 como posibles 
respuestas, de las cuales sólo una es válida), el pro- 
grama espera la introducción del puntero al sprite que 
representa la respuesta correcta. 

El bucle descrito puede repetirse muchas veces para 
la construcción de una serie de preguntas, por lo que 
los ficheros de datos incluyen la gestión del primer re- 
gistro como directorio. 

En la parte baja de la figura se ha representado el for- 
mato típico del fichero: el primer registro contiene el 
puntero al último ocupado, siguen 5 registros con los 
datos relativos a los sprites y uno con el único puntero 
a la solución. Este último grupo de 6 registros (5 + el 
puntero) se repite tantas veces como preguntas hay 
previstas. 


Uso. En la página 2287 se muestra el diagrama del 
programa para la utilización de los datos memoriza- 
dos, o sea para el desarrollo del test con símbolos. 
La primera función activada es la carga de los sprites, 
que consiste en la lectura de los 6 registros que defi- 
nen el test (ver el diagrama anterior). 

A continuación se presentan los 5 símbolos (sprites) 
subdivididos en dos líneas: en la primera, los dos que 
constituyen la serie a completar y, en la segunda, los 
tres entre los que debe realizarse la elección. 

En este punto, el programa se pone en espera de la 
respuesta, que debe ser un valor numérico compren- 
dido entre 4 y 6, por lo que puede preverse un primer 
control que proporcione un diagnóstico sobre si se 
produce o no la condición. Sin embargo, este control 
no es indispensable, puesto que la comprobación que 
sigue también proporciona la eventual indicación de 
error. 

En cualquier caso, conviene separar los dos controles, 
porque en el primer caso se trata de un error de pulsa- 
do o de una equivocación, mientras que, en el segun- 
do, es una respuesta errónea. 


En el caso de respuesta correcta se indica la supera- 
ción del test y el programa pregunta si se desea conti- 
nuar. En caso afirmativo, se lee en el disco o en la cinta 
el siguiente test; si no, el programa termina. 


Preguntas y respuestas con puntuación 


Generación. En la página 2291 se muestra el diagra- 
ma de generación de tests con puntuación. La primera 
función consiste en la introducción de la sigla de iden- 
tificación del test y del número de preguntas que lo 
constituirán, seguida del control de que este número 
no sea superior a 20. 

Sigue un bucle para la introducción de las preguntas 
para un número de veces igual al número introducido 
anteriormente. Cada pregunta se memoriza en uno de 
los 20 registros. Con un bucle análogo se introducen 
las respuestas, aunque se memorizan en un fichero 
diferente que el de las preguntas. 

Por tanto, la estructura que se genera es de dos fiche- 
ros: el primero, identificado con las letras "FP” (fichero 
preguntas) seguidas de la sigla del test (por ejemplo 
”FP01”, primer test), y el segundo por las letras "FR” 
(fichero respuestas) seguidas de la misma sigla 
('FRO1”). 

La última función es la introducción de las gamas de 
puntuación, o sea la descripción asociada a cada po- 
sible puntuación. Utilizando estos datos, en base a la 
respuesta dada y por tanto a la puntuación realizada, 
se emitirá el «juicio». 


Uso. El programa para la utilización de los tests con 
puntuación empieza con la petición de la sigla, código 
mediante el cual se constituyen los nombres de los 
ficheros ("FPxx" y "FRxx"). 

Sigue la lectura en el disco y la presentación en panta- 
lla de las 20 líneas correspondientes a la pregunta. 
Para dar tiempo al usuario a que las lea, se incluye la 
adquisición de un carácter, por lo que el sistema se 
pone en espera hasta que no se pulsa una tecla cual- 
quiera. A continuación, en el fichero “FRxx” se leen 
las diez posibles respuestas que se presentan en pan- 
talla a la espera de la elección por parte del usuario. 
En la introducción de este valor, el programa extrae la 
puntuación (contenida en el mismo registro de las res- 
puestas), la totaliza con las anteriores y empieza un 
nuevo bucle para la gestión de la siguiente pregunta 
(un test completo puede estar formado por varias pre- 
guntas). 

Obsérvese que el paso a utilizar es diferente para los 
dos ficheros: en el primero es 20 y en el segundo, 10. 
Terminado el ciclo de presentación de preguntas y de 
gestión de respuestas, el programa carga el fichero 
"FIxx” (gamas y diagnósticos correspondientes) y em- 
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PROGRAMA DE GENERACION DE TEST 
CON SIMBOLOS (SPRITES) 


Los sprites 1 y 2 constituirán 

la ilustración de la pregunta. 

El número 3 está en blanco. Tras 
los sprites 4, 5 y 6 se presenta 

la respuesta correcta 


Transfiere 
los datos del sprite 
al fichero 


El programa espera que se 
introduzca el número de la figura 
considerada como la respuesta 
correcta (4 + 6) 


Transfiere El número de respuesta se 
l fichero inserta en el registro a : 
a continuación de los que contienen 
los datos de los sprites. 


MX contiene el 
número de tests 
introducidos 


Actualiza 
el puntero 


(*) La generación de los sprites se realiza con métodos distintos según la máquina utilizada. A cada 
sprite generado se pide la confirmación 


FORMATO DEL FICHERO 


Registro 


Respuesta 
prevista 


N.B.: cada sprite está constituido por n registros 
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PROGRAMA PARA EL USO DE TESTS CON SIMBOLO 


La respuesta introducida 
debe corresponder 

a la prevista en 

la generación 


Se lee el siguiente grupo 
de registros a menos que se haya 
superado MX (último introducido) 


(*) Esta función se realiza con métodos distintos según la máquina utilizada. 


2287 


TEST CON SIMBOLOS: FORMATO FICHERO PARA LA VERSION CINTA MSX 


| Indicador 
| de principio fichero 


1.* registro 1 test = 5 registros de 32 bytes 
+ 1 registro de 1 byte 


TESTS CON SPRITES (VERSION APPLE) 


FICHERO: “SIMBOLOS” CO = código carácter 
LR: 75 GT = juego de caracteres 
1 registro = 1 sprite (0 = ASCII norm. 1 = ASCII inv., 
2 = Semigr. norm., = sem. inv.) 


1 75 


75 bytes 


Sprite 5 x 5 caracteres semigráficos 
50 bytes para los códigos de 
75 los caracteres 

25 bytes para el set de cada 
Pregunta 


| 
| 
| 
| 
| 
| 
| 
y 


código 


Elecciones posibles 1." test = 6 registros 


(respuesta) 


N. sprite correcto 


1 fichero: máx. 50 test 
máx. 300 + 1 registro 
máx. 16 kbytes aprox. 
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FLUJO DEL PROGRAMA TEST 
CON PREGUNTAS Y PUNTUACION 


1 pregunta = 20 registros de 35 bytes 


Fichero respuestas 
Nombre = FR 


Fichero preguntas 
Nombre = FP 


En base al número de 
la pregunta se toman 
las respuestas 


Cada respuesta emplea 10 registros 
de 35 caracteres (33 para el texto y 
2 para el apuntado) 


[== 
y 


ichero punto: 
Nombre = FT 


1.9 registro = 20 campos 
(mínimo/máximo) de 
definición de gama; los otros 
de definición del resultado 


LE] 
y 


Se lee una nueva pregunta NO 
y el ciclo vuelve a empezar E 
desde el principio 


pieza a buscar la puntuación obtenida entre las me- 
morizadas. Como se trata de una gama de puntua- 
ción, es necesario reconocer cuándo el valor obtenido 
es inferior o igual al extremo superior, o superior o 
igual al inferior. 

El caso en que la puntuación obtenida no pertenezca 
a ninguna gama no se ha previsto en el programa, por 


2290 


o | 
[7 


lo que si se produce, se obtiene un diagnóstico y el 
final del proceso. 

La última función utiliza el puntero de la gama así de- 
terminada para extraer el «juicio» y presentarlo en 
pantalla. Sigue la pregunta de continuación: si la res- 
puesta es afirmativa, se repite el mismo ciclo para un 
nuevo test y, si no es así, el programa termina. 


123455607 


1.% registro = 
Contiene las gamas 
de puntuación 
(máx. 10) 


Registros de 2a 11 = 
Descripciones 


DIAGRAMA FUNCIONAL 
DEL PROGRAMA CON 
PUNTUACION: GENERACION 


Cada test debe contener 
por lo menos 1 pregunta 
y no más de 20 


Bucle sobre las preguntas (cada una 


Para cada gama un 
“diagnóstico” de 80 caracteres 


FORMATO REGISTROS 
8_9 10 11 12 13 14 15 16 171819 


80 bytes 


La sigla del test está compuesta 
por dos caracteres alfanuméricos 
y se utiliza para formar los 
nombres de los ficheros. El 
número de preguntas sirve 

para determinar la longitud 


Principio bucle introducción 
preguntas 


La introducción se realiza con la 
data entry. Los 20 registros de 
35 bytes constituyen otros tantos 
buffers de la data entry 


Cada registro contiene una línea 


ia Transfiere los de la data entry, o sea un 


registros l al = 20 elemento de B$(«). La 
al fichero transferencia al fichero se obtiene 


Este bloque contiene 
un bucle análogo al 
anterior 


El fichero del texto de las preguntas 
(FP"nn”, con “nn” sigla del test) 
contiene O o 1 en el registro (según 
el tipo de máquina) y el número (N) 
de preguntas que constituyen el test 
(en el diagrama, la gestión de este 
registro no se presenta) 


con un bucle de 1 a 20 (sobre los 
20 elementos de B$(+)). El fichero 
puede ser secuencial 


Fin introducción preguntas 


Las 10 respuestas constituyen 
10 registros del fichero FR"nn” 
(con “nn” sigla del test) y se 
memorizan de manera análoga a 
las preguntas, con la puntuación 
además. 


Las gamas, con un máximo de 10, 
se introducen en el registro 1, y 
las descripciones del resultado, 
en los registros 2 a 11 


N.B.: como no hay un menú 
principal, para cada FS = 7, 
el programa presenta la máscara 
anterior a la presentada entonces 
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Tests con atributos 


El programa para los tests con atributos requiere una 
estructura más compleja que los otros, puesto que de- 
be gestionar dos ficheros correlacionados: 


" el primero, con las descripciones de los atributos 
que se van a utilizar ("ATxx”) 

" el segundo (”ELxx”), con los datos a los que deben 
aplicarse los atributos. 


DIAGRAMA FUNCIONAL 
DEL PROGRAMA CON 
PUNTUACION: USO 


Del fichero FP“nn” 
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La simbología utilizada es análoga a la anterior y, por 
tanto, en el disco existirán tantos ficheros ”AT..” y 
”EL..” como los tests previstos, cada uno identificado 
con una sigla de dos caracteres. 

El primero de los dos ficheros se emplea para presen- 
tar en pantalla las descripciones de los atributos, y el 
segundo para formular la pregunta, o sea o la selec- 
ción de los elementos que tienen atributos, o la indica- 
ción de éstos correspondientes a cada elemento. 

Al final se comprueban las respuestas comparando 


El sistema comprueba que el 
test del que se ha pedido el 
desarrollo exista en el diskette 
montado, comprobando la 
existencia del fichero FP"nn” 
(nn = sigla) 


Principio bucle de presentación 
preguntas y espera de respuestas 


El test está constituido por 
diferentes preguntas, cada una 
dividida en 20 líneas 
memorizadas en otros tantos 
registros. La lectura del texto de 
las preguntas se hace con un 
bucle de la posición | ala! + 19 


Espera de un carácter 
cualquiera para proseguir 


Las respuestas, con un máximo 
de 10, se memorizan en 

10 registros del fichero FR“nn”. 
Este bloque es por tanto un bucle 
del registro K al registro K + 9 
(no puede emplearse el índice | 
porque los dos ficheros tienen un 
paso diferente) 


Los 10 registros de FR“nn” 
contienen, además del 

texto de la respuesta, la 
puntuación asociada (en los 
bytes 34 y 35). La puntuación 
realizada con la respuesta 
se extrae de estos bytes y se 
totaliza en PP 


Siguiente pregunta O 


Paso del 
fichero FP 


La longitud del fichero FP, 
Paso del y por tanto el valor de *l" 
fichero FR que termina el bucle, se 
memorizan en el registro 1 (o 0) 


El registro 1 del fichero 
FT"nn” contiene las gamas 


AO e o 
PROGRAMA CON obtenidas en las distintas preguntas, 
PUNTUACION: EXTRACCION y las matrices MI(10) y MX(10), los 
DE LOS PUNTOS REALIZADOS límites de las diversas gamas 


Principio bucle de selección gama 


sI 
—>(0 Emisión del juicio 
Gama 


hallada 


Este error puede producirse sólo 
después de una generación 

errónea del test. Si se presenta, > 
hay que comprobar lo que se ha 
introducido en la fase de 
generación 


LE 


El índice | apunta a la gama 

a la que pertenece la 

puntuación realizada. El juicio Espera de un carácter 
está en el registro | + 1 del cualquiera 

fichero FT“nn” 


Si 


Nuevo test Ge— 
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TESTS CON ATRIBUTOS: DIAGRAMA DE PRINCIPIO 


Generación 
variación 
descripciones 


xd Fichero AT"nn” 


Los nombres de los elementos y 

10 bytes de presencia/ausencia 

de atributo están memorizados en 
2 matrices diferentes, de dimensión 
100 (número máximo de elementos 
gestionados por el programa) 


las elecciones realizadas por el usuario con los flags 
contenidos en los ficheros. 


Generación. La generación de los tests con atributos 
empieza, como en los otros casos, con la introducción 
de las dos letras de identificación del test, con las que 
se construirán los nombres de los ficheros. 

Sigue una data entry para la introducción de las des- 
cripciones de cada atributo, o sea de las necesarias 
explicaciones para identificar, unívocamente, cada 
una de las diez características. 

Al final de la introducción realizada con una máscara 
única de 10 campos de 30 caracteres, un bucle de 1 a 
10 permite la memorización de cada atributo en un re- 
gistro del fichero ”ATxx”. 

La parte siguiente del programa se dedica a la intro- 
ducción de los elementos que constituirán el test y de 
los flags de presentación/ausencia de atributo. 

En este caso, el bucle de transferencia al disco es ex- 
terior a la introducción, por lo que cada dato es memo- 
rizado en el fichero inmediatamente después de su in- 
troducción por teclado. 

Este método hace más difíciles las eventuales correc- 
ciones, pero es necesario porque como hay que pre- 
ver una data entry con 11 campos para cada registro 
(descripción más 10 flags), no es posible resolver la 
introducción con una máscara única. 


Uso. El programa para el uso de los tests con atribu- 
tos, sin duda es el más complejo porque prevé dos 
alternativas: 


m en el primer caso se extraen un atributo y 10 ele- 
mentos (nombres), y el usuario debe indicar cuáles 
poseen el atributo en cuestión 

"m en el segundo, el funcionamiento es opuesto, o sea 
el programa presenta un elemento y pregunta cuá- 
les son los atributos que le pertenecen. 


Después, las respuestas se comprueban utilizando los 
flags introducidos en la fase de generación. 

Sin embargo, el programa empieza con una función 
accesoria, o sea la presentación de un texto de i¡lustra- 
ción (memorizado en la generación y con un programa 
adecuado en el fichero ”AT..”). 

Esta fase sólo se activa si se pide, por lo que puede 
omitirse. 

Después de la presentación de las explicaciones se 
carga el fichero "EL..” y, en función del tipo de desa- 
rrollo elegido, se selecciona el primero o el segundo 
caso. 

En el primer caso se genera un número aleatorio que 
sirve para extraer uno de los atributos (la generación 
aleatoria del atributo permite utilizar muchas veces el 
mismo test con escasas probabilidades de repetición) 
y siguen la presentación de los 10 nombres, la espera 
de la respuesta y su comprobación. 

En el segundo caso, el número aleatorio se utiliza para 
extraer un nombre al azar entre los previstos, presen- 
tando todos los atributos que pertenecen al nombre y, 
por tanto, el programa adquiere una cadena con di- 
chas indicaciones y la compara con los flags corres- 
pondientes al nombre seleccionado. 


PROGRAMA DE GENERACION TESTS CON ATRIBUTOS 


Si el fichero no existe, se crea; 
si existe, el programa pasa a 
actualización para la variación 
de los datos contenidos (en 
algunas versiones no existe 
automatismo, y el operador 
es el que debe realizar la 
elección) 


Las descripciones, en un 
máximo de 10, pueden ocupar 
cada una 30 caracteres, y 
están memorizadas en los 10 
registros del fichero AT"nn” 
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Principio bucle de 
memorización. Un registro es 
una línea de la data entry 


Transfiere B$(1) 
al registro “l” Registro 1 Registro 2 


Principio bucle introducción de 
los elementos y de los indicadores 
(0, 1) de atributo activo 


B$(1) = Nombre elemento (20 by- 
tes) 
, , B$(2) a B$(11) = presencia/ 
Es claro que el primer registro ausencia 
del fichero EL + "nn" debe atributo 
contener el número de elementos 
del test (máx. 100) Los buffers de B$(3) a B$(21) 
contienen un solo byte (de 
valor 0 o 1) y se suman a 
A$ para formar la cadena 
completa asociada al nombre 
contenido en B$(1) 


Longitud del registro = 30 
bytes (20 para el elemento y 
10 para los indicadores) 


Transfiere al 
fichero EL“nn” 


La rutina de actualización es análoga, pero además tiene la lectura y la presentación del dato preexistente a variar. 
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